Mercurial > emacs
view etc/emacs.csh @ 85763:3b291390be13
(ps-xemacs-color-name, ps-xemacs-face-kind-p): Only
do work for XEmacs.
(ps-xemacs-mapper): Rename from ps-mapper, only work on XEmacs.
(ps-xemacs-extent-sorter): Rename from ps-extent-sorter, only work
on XEmacs.
(ps-x-color-instance-p, ps-x-color-instance-rgb-components)
(ps-x-color-name, ps-x-color-specifier-p)
(ps-x-copy-coding-system, ps-x-device-class)
(ps-x-extent-end-position, ps-x-extent-face)
(ps-x-extent-priority, ps-x-extent-start-position)
(ps-x-face-font-instance, ps-x-find-coding-system)
(ps-x-font-instance-properties, ps-x-make-color-instance)
(ps-x-map-extents, ps-e-face-bold-p, ps-e-face-italic-p)
(ps-e-next-overlay-change, ps-e-overlays-at, ps-e-overlay-get)
(ps-e-overlay-end, ps-e-x-color-values, ps-e-color-values):
(ps-generate-postscript-with-faces): Delete defaliases.
(ps-face-foreground-name, ps-face-background-name)
(ps-color-values, ps-face-bold-p, ps-face-italic-p): Move
definitions to top level, make the body conditional on the emacs
flavor. Replace uses of deleted aliases and renamed functions.
(ps-generate-postscript-with-faces, ps-color-device): Replace uses
of deleted aliases and renamed functions.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Mon, 29 Oct 2007 16:45:23 +0000 |
parents | e5c92420fce1 |
children | bdb3fe0ba9fa 4f618405b3d2 |
line wrap: on
line source
### emacs.csh ## Add legal notice if non-trivial amounts of code are added. ## Author: Michael DeCorte ### Commentary: ## This defines a csh command named `edit' which 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'). ## These are the possible values of $whichjob ## 1 = new ordinary emacs (the -nw is so that it doesn't try to do X) ## 2 = resume emacs ## 3 = new emacs under X (-i is so that you get a reasonable icon) ## 4 = resume emacs under X set EMACS_PATTERN="^\[[0-9]\] . Stopped ............ $EMACS" alias edit 'set emacs_command=("emacs -nw \!*" "fg %emacs" "emacs -i \!* &"\ "emacsclient \!* &") ; \ jobs >! $HOME/.jobs; grep "$EMACS_PATTERN" < $HOME/.jobs >& /dev/null; \ @ isjob = ! $status; \ @ whichjob = 1 + $isjob + $?DISPLAY * 2 + $?WINDOW_PARENT * 4; \ test -S ~/.emacs_server && emacsclient \!* \ || echo `pwd` \!* >! ~/.emacs_args && eval $emacs_command[$whichjob]' # arch-tag: 433d58df-15b9-446f-ad37-f0393e3a23d4