Update emacs for editors protocol.
parent
6bb46a3f1e
commit
2d12fea828
|
@ -1,6 +1,5 @@
|
||||||
USING: definitions io.launcher kernel parser words sequences math
|
USING: combinators.short-circuit editors kernel make
|
||||||
math.parser namespaces editors make system combinators.short-circuit
|
math.parser namespaces sequences system vocabs ;
|
||||||
fry threads vocabs ;
|
|
||||||
IN: editors.emacs
|
IN: editors.emacs
|
||||||
|
|
||||||
SINGLETON: emacsclient
|
SINGLETON: emacsclient
|
||||||
|
@ -21,10 +20,7 @@ M: emacsclient editor-command ( file line -- command )
|
||||||
"--no-wait" ,
|
"--no-wait" ,
|
||||||
number>string "+" prepend ,
|
number>string "+" prepend ,
|
||||||
,
|
,
|
||||||
] { } make
|
] { } make ;
|
||||||
os windows? [ run-detached drop ] [ try-process ] if ;
|
|
||||||
|
|
||||||
: emacs ( word -- )
|
|
||||||
where first2 emacsclient ;
|
|
||||||
|
|
||||||
os windows? [ "editors.emacs.windows" require ] when
|
os windows? [ "editors.emacs.windows" require ] when
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue