From 0d3a5e372add558955d6be991ceef47f3a6f05fd Mon Sep 17 00:00:00 2001
From: Doug Coleman <erg@secrets.local>
Date: Wed, 12 Nov 2008 00:39:56 -0600
Subject: [PATCH] allow setting of emacsclient

---
 basis/editors/emacs/emacs.factor | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/basis/editors/emacs/emacs.factor b/basis/editors/emacs/emacs.factor
index 1d9f72f8c3..eae6a3077b 100644
--- a/basis/editors/emacs/emacs.factor
+++ b/basis/editors/emacs/emacs.factor
@@ -4,12 +4,14 @@ IN: editors.emacs
 
 : emacsclient ( file line -- )
     [
-        "emacsclient" ,
+        \ emacsclient get ,
         "--no-wait" ,
         "+" swap number>string append ,
         ,
     ] { } make try-process ;
 
+\ emacsclient "emacsclient" set-global
+
 : emacs ( word -- )
     where first2 emacsclient ;