editors.emacs: add an emacsclient-args on request.
parent
0f52366466
commit
0fd663e25d
|
@ -6,6 +6,7 @@ SINGLETON: emacsclient
|
||||||
emacsclient editor-class set-global
|
emacsclient editor-class set-global
|
||||||
|
|
||||||
SYMBOL: emacsclient-path
|
SYMBOL: emacsclient-path
|
||||||
|
SYMBOL: emacsclient-args
|
||||||
|
|
||||||
HOOK: find-emacsclient os ( -- path )
|
HOOK: find-emacsclient os ( -- path )
|
||||||
|
|
||||||
|
@ -22,6 +23,7 @@ M: windows find-emacsclient
|
||||||
M: emacsclient editor-command ( file line -- command )
|
M: emacsclient editor-command ( file line -- command )
|
||||||
[
|
[
|
||||||
emacsclient-path get [ find-emacsclient ] unless* ,
|
emacsclient-path get [ find-emacsclient ] unless* ,
|
||||||
|
emacsclient-args get %
|
||||||
"-a=emacs" ,
|
"-a=emacs" ,
|
||||||
"--no-wait" ,
|
"--no-wait" ,
|
||||||
number>string "+" prepend ,
|
number>string "+" prepend ,
|
||||||
|
|
Loading…
Reference in New Issue