X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/6c791c2c94206e808c6a387b986b6e24f3bf06b3..f65ef744683fe389a3464776a9eca0d2a8f54335:/emacs/ptags

diff --git a/emacs/ptags b/emacs/ptags
index 8039153..c017e66 100755
--- a/emacs/ptags
+++ b/emacs/ptags
@@ -36,7 +36,7 @@ case "$1" in
     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):