]> gitweb.factorcode.org Git - factor.git/commitdiff
run with --no-wait on windows so emacsclient doesn't block, use run-detached so that...
authorDoug Coleman <doug.coleman@gmail.com>
Fri, 20 Feb 2009 18:25:55 +0000 (12:25 -0600)
committerDoug Coleman <doug.coleman@gmail.com>
Fri, 20 Feb 2009 18:25:55 +0000 (12:25 -0600)
basis/editors/emacs/emacs.factor

index fa78c1b429af7bb3659dddc15b3db7f100ce0194..0aeb7bb467f4218ea3c3c20100ac85d111922a0f 100644 (file)
@@ -1,5 +1,6 @@
 USING: definitions io.launcher kernel parser words sequences math
-math.parser namespaces editors make system combinators.short-circuit ;
+math.parser namespaces editors make system combinators.short-circuit
+fry threads ;
 IN: editors.emacs
 
 SYMBOL: emacsclient-path
@@ -11,10 +12,10 @@ M: object default-emacsclient ( -- path ) "emacsclient" ;
 : emacsclient ( file line -- )
     [
         { [ \ emacsclient-path get ] [ default-emacsclient ] } 0|| ,
-        os windows? [ "--no-wait" , ] unless
+        "--no-wait" ,
         number>string "+" prepend ,
         ,
-    ] { } make try-process ;
+    ] { } make run-detached drop ;
 
 : emacs ( word -- )
     where first2 emacsclient ;