Mercurial > emacs
annotate etc/emacs.bash @ 58534:c655bc81dfc0
(gdb-view-source, gdb-selected-view):
Delete variables.
(gdb-ann3): Don't make GUD buffer dedicated.
(gdb-goto-breakpoint, gdb-display-buffer): Don't always
dedicate.
(gdb-display-source-buffer): Delete function.
(gdb-view-source-function, gdb-view-assembler): Delete functions.
(menu): Delete menu bindings for viewing source/assembler.
(gdb-setup-windows, gdb-restore-windows):
Don't dedicate GUD. No assembler now.
(gdb-reset): No need to undedicate source buffers now.
(gdb-source-info): No assembler now.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Fri, 26 Nov 2004 15:41:22 +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 |