Mercurial > emacs
annotate etc/emacs.bash @ 49195:c297d31ef382
(ruler-mode-comment-column-char, ruler-mode-goal-column-char)
(ruler-mode-set-goal-column-ding-flag, ruler-mode-mouse-current-grab-object):
New variables.
(ruler-mode-comment-column-face, ruler-mode-goal-column-face): New faces.
(ruler-mode-mouse-set-fill-column): Removed.
(ruler-mode-mouse-grab-any-column, ruler-mode-mouse-drag-any-column-iteration)
(ruler-mode-mouse-drag-any-column): New functions.
(ruler-mode-map): [header-line down-mouse-2] Bound to
`ruler-mode-mouse-grab-any-column' instead of
`ruler-mode-mouse-set-fill-column'.
(ruler-mode): Cleanup buffer local variable `header-line-format' if it didn't
exist when `ruler-mode' was enabled.
(ruler-mode-ruler-help-echo): Updated its value.
(ruler-mode-ruler-help-echo-when-goal-column): New help string used when
goal-column is already set.
(ruler-mode-ruler-help-echo-tab): Renamed to...
(ruler-mode-ruler-help-echo-when-tab-stops): New.
(ruler-mode-fill-column-help-echo, ruler-mode-comment-column-help-echo)
(ruler-mode-goal-column-help-echo): New help strings.
(ruler-mode-ruler): Use `ruler-mode-ruler-help-echo-when-goal-column' instead of
`ruler-mode-ruler-help-echo' if `goal-column' is set. Show `comment-column' and
`goal-column'. Echo the different help string for each *-column characters on
the ruler.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Mon, 13 Jan 2003 08:22:50 +0000 |
parents | e96ffe544684 |
children | 23a1cea22d13 |
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 | |
10 # refers to the real program, e.g. | |
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 | |
36 else | |
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 |