case "$1" in
fullpath)
cwd=`pwd`
+ cperl_add_tags='cperl-add-tags-recurse-noxs-fullpath'
echo "Building TAGS with full paths"
;;
*)
- cwd='.'
+ cperl_add_tags='cperl-add-tags-recurse-noxs'
+ cwd='.'
echo "Building TAGS with relative paths"
esac
-emacs=`(which emacs || which xemacs) 2>/dev/null`
+emacs=`(which emacs || which xemacs || echo emacs) 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):
# 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 ; then
mv TAGS TAGS.tmp
fi