Mercurial > emacs
annotate etc/emacs.bash @ 83021:32bf8e7cc0c2
Fixed tty faces during combo sessions. Plus other assorted bugfixes.
lisp/startup.el (command-line): Always call tty-register-default-colors.
src/dispextern.h (delete_tty): Added missing prototype.
src/keyboard.c (read_avail_input): Close display gracefully if needed.
Kill Emacs if the last display is to be closed.
(tty_read_avail_input): Don't call delete_tty and don't signal hangup here;
return -2 instead to indicate the non-transient failure to read_avail_input.
src/term.c (delete_tty): Removed superflous wiping of the deleted
frames' output_data field.
(delete_display): Check for and close live frames that are still on the display.
src/termhooks.h (read_socket_hook, delete_display_hook): Added detailed comment.
src/xfaces.c (realize_face): Create a dummy face for the initial frame.
(Reported by Robert J. Chassell (bob at rattlenake dot com).)
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-61
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Fri, 23 Jan 2004 21:48:58 +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 |