summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStas Bekman <stas@stason.org>2003-08-24 15:05:00 -0700
committerJarkko Hietaniemi <jhi@iki.fi>2003-08-25 05:14:04 +0000
commitea544449e73130764018d2271b25d591c67b445d (patch)
treebee3e2ab70d3e7ebbcc5902b696dde03e3007ea8
parent03cf1158aea7bfda5619d586822a3e2279d5241b (diff)
downloadperl-ea544449e73130764018d2271b25d591c67b445d.tar.gz
[patch emacs/ptags] allow xemacs to be used
Message-ID: <3F4998FC.3090401@stason.org> p4raw-id: //depot/perl@20870
-rwxr-xr-xemacs/ptags7
1 files changed, 5 insertions, 2 deletions
diff --git a/emacs/ptags b/emacs/ptags
index 3294ed97c4..0ff7836c3c 100755
--- a/emacs/ptags
+++ b/emacs/ptags
@@ -17,6 +17,9 @@
# Avoid builtin on OS/2:
if test ! -z "$OS2_SHELL"; then alias find=gnufind; fi
+emacs=`(which emacs || which xemacs) 2>/dev/null`
+[ -x "$emacs" ] || { echo "can't find emacs or xemacs in PATH"; exit 1; }
+
# Insure proper order (.h after .c, .xs before .c in subdirs):
# Move autogenerated less-informative files to the end:
# Hard to do embed.h and embedvar.h in one sweep:
@@ -141,13 +144,13 @@ etags -o TAGS.tmp -a "$@" $subdirfiles
etags -o TAGS.tmp -a "$@" $subdirfiles1
if test ! -f emacs/cperl-mode.elc ; then
- ( cd emacs; emacs -batch -q -no-site-file -f batch-byte-compile cperl-mode.el )
+ ( cd emacs; $emacs -batch -q -no-site-file -f batch-byte-compile cperl-mode.el )
fi
# This should work with newer Emaxen
cp TAGS.tmp TAGS
-if emacs -batch -q -no-site-file -l emacs/cperl-mode.elc -f cperl-add-tags-recurse-noxs ; then
+if $emacs -batch -q -no-site-file -l emacs/cperl-mode.elc -f cperl-add-tags-recurse-noxs ; then
mv TAGS TAGS.tmp
fi