emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/etc/emacs.csh [lexbind]


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/etc/emacs.csh [lexbind]
Date: Tue, 14 Oct 2003 19:08:11 -0400

Index: emacs/etc/emacs.csh
diff -c /dev/null emacs/etc/emacs.csh:1.1.18.1
*** /dev/null   Tue Oct 14 19:08:11 2003
--- emacs/etc/emacs.csh Tue Oct 14 19:08:04 2003
***************
*** 0 ****
--- 1,27 ----
+ # This defines a csh command named `edit' which resumes an
+ # existing Emacs or starts a new one if none exists.
+ # One way or another, any arguments are passed to Emacs to specify files
+ # (provided you have loaded `resume.el').
+ # - Michael DeCorte
+ 
+ # These are the possible values of $whichjob
+ # 1 = new ordinary emacs (the -nw is so that it doesn't try to do X)
+ # 2 = resume emacs
+ # 3 = new emacs under X (-i is so that you get a reasonable icon)
+ # 4 = resume emacs under X
+ # 5 = new emacs under suntools
+ # 6 = resume emacs under suntools
+ # 7 = new emacs under X and suntools - doesn't make any sense, so use X
+ # 8 = resume emacs under X and suntools - doesn't make any sense, so use X
+ set EMACS_PATTERN="^\[[0-9]\]  . Stopped ............ $EMACS"
+ 
+ alias edit 'set emacs_command=("emacs -nw \!*" "fg %emacs" "emacs -i \!* &"\
+  "emacsclient \!* &" "emacstool \!* &" "emacsclient \!* &" "emacs -i \!* &"\
+  "emacsclient \!* &") ; \
+  jobs >! $HOME/.jobs; grep "$EMACS_PATTERN" < $HOME/.jobs >& /dev/null; \
+  @ isjob = ! $status; \
+  @ whichjob = 1 + $isjob + $?DISPLAY * 2 + $?WINDOW_PARENT * 4; \
+  test -S ~/.emacs_server && emacsclient \!* \
+  || echo `pwd` \!* >! ~/.emacs_args && eval $emacs_command[$whichjob]'
+ 
+ # arch-tag: 433d58df-15b9-446f-ad37-f0393e3a23d4




reply via email to

[Prev in Thread] Current Thread [Next in Thread]