Mercurial > emacs
annotate etc/emacs.bash @ 55338:3fe6300a67bf
*** empty log message ***
| author | Jason Rumney <jasonr@gnu.org> |
|---|---|
| date | Mon, 03 May 2004 13:51:59 +0000 |
| parents | 695cf19ef79e |
| children | 615a90f44f52 375f2633d815 |
| rev | line source |
|---|---|
| 25853 | 1 # This defines a bash command named `edit' which contacts/resumes an |
| 2 # existing emacs or starts a new one if none exists. | |
| 3 # | |
| 4 # One way or another, any arguments are passed to emacs to specify files | |
| 5 # (provided you have loaded `resume.el'). | |
| 6 # | |
| 7 # This function assumes the emacs program is named `emacs' and is somewhere | |
| 8 # in your load path. If either of these is not true, the most portable | |
| 9 # (and convenient) thing to do is to make an alias called emacs which | |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25853
diff
changeset
|
10 # refers to the real program, e.g. |
| 25853 | 11 # |
| 12 # alias emacs=/usr/local/bin/gemacs | |
| 13 # | |
| 14 # Written by Noah Friedman. | |
| 15 | |
| 16 function edit () | |
| 17 { | |
| 18 local windowsys="${WINDOW_PARENT+sun}" | |
| 19 | |
| 20 windowsys="${windowsys:-${DISPLAY+x}}" | |
| 21 | |
| 22 if [ -n "${windowsys:+set}" ]; then | |
| 23 # Do not just test if these files are sockets. On some systems | |
| 24 # ordinary files or fifos are used instead. Just see if they exist. | |
| 25 if [ -e "${HOME}/.emacs_server" -o -e "/tmp/esrv${UID}-"* ]; then | |
| 26 emacsclient "$@" | |
| 27 return $? | |
| 28 else | |
| 29 echo "edit: starting emacs in background..." 1>&2 | |
| 30 fi | |
| 31 | |
| 32 case "${windowsys}" in | |
| 33 x ) (emacs "$@" &) ;; | |
| 34 sun ) (emacstool "$@" &) ;; | |
| 35 esac | |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25853
diff
changeset
|
36 else |
| 25853 | 37 if jobs %emacs 2> /dev/null ; then |
| 38 echo "$(pwd)" "$@" >| ${HOME}/.emacs_args && fg %emacs | |
| 39 else | |
| 40 emacs "$@" | |
| 41 fi | |
| 42 fi | |
| 43 } | |
| 44 | |
| 45 | |
| 52401 | 46 # arch-tag: 1e1b74b9-bf2c-4b23-870f-9eebff7515cb |
