diff options
| author | John Wiegley <johnw@newartisans.com> | 2001-05-18 16:39:29 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2001-05-18 16:39:29 +0000 |
| commit | a129972c07ad25aae491e33c72cee9ccb9843f22 (patch) | |
| tree | bd5ac89739fa0fd5c6e0bdd159b1177ae09feb5e /lisp/eshell/em-cmpl.el | |
| parent | c9f3bebe239c7d87653e7b4ab117850cc8a64227 (diff) | |
| download | emacs-a129972c07ad25aae491e33c72cee9ccb9843f22.tar.gz | |
(eshell-completion-command-name, eshell-complete-commands-list): Use
`eshell-explicit-command-char' instead of ?*.
Diffstat (limited to 'lisp/eshell/em-cmpl.el')
| -rw-r--r-- | lisp/eshell/em-cmpl.el | 4 |
1 files 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)) |