Mercurial > emacs
view etc/emacs.bash @ 88955:1d1275f5d5b7
(tar-file-name-coding-system): New variable. Make
it permanent-local.p
(tar-header-block-tokenize): Decode filename and linkname by
tar-file-name-coding-system.
(tar-header-block-checksum): Call multibyte-char-to-unibyte to get
the byte value of eight-bit chars.
(tar-summarize-buffer): Call set-buffer-multibyte with METHOD
`to'. Delete unnecessary call of position-bytes.
(tar-mode): Set tar-file-name-coding-system. Delete unnecessary
call of position-bytes.
(tar-extract): Simplified by calling decode-coding-region with
DESTINATION argument. Don't toggle multibyteness of tar buffer.
(tar-copy): Don't toggle multibyteness of tar buffer.
(tar-expunge): Likewise.
(tar-clear-modification-flags): Delete unnecessary call of
position-bytes.
(tar-rename-entry): Call tar-alter-one-field with encoded new
name.
(tar-alter-one-field): Don't toggle multibyteness of tar buffer.
Convert new-data-string by string-to-multibyte before inserting
it.
(tar-subfile-save-buffer): Don't toggle multibyteness of tar
buffer. Simplified by calling encoding-coding-region with
DESTINATION argument.
(tar-mode-write-file): Delete unnecessary call of
byte-to-position.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Wed, 31 Jul 2002 07:14:35 +0000 |
parents | e96ffe544684 |
children | 23a1cea22d13 |
line wrap: on
line source
# This defines a bash command named `edit' which contacts/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'). # # This function assumes the emacs program is named `emacs' and is somewhere # in your load path. If either of these is not true, the most portable # (and convenient) thing to do is to make an alias called emacs which # refers to the real program, e.g. # # alias emacs=/usr/local/bin/gemacs # # Written by Noah Friedman. function edit () { local windowsys="${WINDOW_PARENT+sun}" windowsys="${windowsys:-${DISPLAY+x}}" if [ -n "${windowsys:+set}" ]; then # Do not just test if these files are sockets. On some systems # ordinary files or fifos are used instead. Just see if they exist. if [ -e "${HOME}/.emacs_server" -o -e "/tmp/esrv${UID}-"* ]; then emacsclient "$@" return $? else echo "edit: starting emacs in background..." 1>&2 fi case "${windowsys}" in x ) (emacs "$@" &) ;; sun ) (emacstool "$@" &) ;; esac else if jobs %emacs 2> /dev/null ; then echo "$(pwd)" "$@" >| ${HOME}/.emacs_args && fg %emacs else emacs "$@" fi fi }