From ca12a9dd9c8392d9025810c78c5795152f33355b Mon Sep 17 00:00:00 2001
From: "wayo.cavazos" <wayo.cavazos@gmail.com>
Date: Wed, 16 Aug 2006 08:45:59 +0000
Subject: [PATCH] Factor/Emacs integration via emacsclient and emacs word

---
 contrib/emacs.factor | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 contrib/emacs.factor

diff --git a/contrib/emacs.factor b/contrib/emacs.factor
new file mode 100644
index 0000000000..9f52274b1b
--- /dev/null
+++ b/contrib/emacs.factor
@@ -0,0 +1,14 @@
+
+REQUIRES: process ;
+
+USING: kernel parser words sequences math process ;
+
+IN: emacs
+
+: emacsclient ( file line -- )
+number>string "emacsclient --no-wait +" swap append " " rot append3 system ;
+
+: emacs ( word -- )
+dup word-file swap "line" word-prop emacsclient ;
+
+PROVIDE: emacs ;
\ No newline at end of file