2006-09-06 17:01:38 -04:00
|
|
|
REQUIRES: contrib/process ;
|
2006-08-16 04:45:59 -04:00
|
|
|
|
2006-08-25 00:25:43 -04:00
|
|
|
USING: definitions kernel parser words sequences math process
|
|
|
|
namespaces ;
|
2006-08-16 04:45:59 -04:00
|
|
|
|
|
|
|
IN: emacs
|
|
|
|
|
|
|
|
: emacsclient ( file line -- )
|
2006-10-08 06:37:52 -04:00
|
|
|
number>string "emacsclient --no-wait +" swap append " " rot append3 system drop ;
|
2006-08-16 04:45:59 -04:00
|
|
|
|
|
|
|
: emacs ( word -- )
|
2006-08-25 00:07:54 -04:00
|
|
|
where first2 emacsclient ;
|
|
|
|
|
2006-08-31 16:35:10 -04:00
|
|
|
[ emacsclient ] edit-hook set-global
|
2006-08-16 04:45:59 -04:00
|
|
|
|
2006-09-06 17:01:38 -04:00
|
|
|
PROVIDE: contrib/emacs ;
|