From a129972c07ad25aae491e33c72cee9ccb9843f22 Mon Sep 17 00:00:00 2001 From: John Wiegley Date: Fri, 18 May 2001 16:39:29 +0000 Subject: [PATCH] (eshell-completion-command-name, eshell-complete-commands-list): Use `eshell-explicit-command-char' instead of ?*. --- lisp/eshell/em-cmpl.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/eshell/em-cmpl.el b/lisp/eshell/em-cmpl.el index 6c3032d069e..3b620b074d2 100644 --- a/lisp/eshell/em-cmpl.el +++ b/lisp/eshell/em-cmpl.el @@ -306,7 +306,7 @@ to writing a completion function." "Return the command name, possibly sans globbing." (let ((cmd (file-name-nondirectory (pcomplete-arg 'first)))) (setq cmd (if (and (> (length cmd) 0) - (eq (aref cmd 0) ?*)) + (eq (aref cmd 0) eshell-explicit-command-char)) (substring cmd 1) cmd)) (if (eshell-under-windows-p) @@ -396,7 +396,7 @@ to writing a completion function." (if (file-name-directory filename) (pcomplete-executables) (if (and (> (length filename) 0) - (eq (aref filename 0) ?*)) + (eq (aref filename 0) eshell-explicit-command-char)) (setq filename (substring filename 1) pcomplete-stub filename glob-name t)) -- 2.39.5