Mercurial > emacs
changeset 6885:3c007de39916
(shell-dynamic-complete-as-command): Don't match ignored-extensions if it's nil.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Thu, 14 Apr 1994 19:19:30 +0000 |
parents | 58db14526c1d |
children | d4010211153e |
files | lisp/shell.el |
diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/shell.el Thu Apr 14 18:40:45 1994 +0000 +++ b/lisp/shell.el Thu Apr 14 19:19:30 1994 +0000 @@ -702,7 +702,8 @@ (setq file (car comps-in-path) filepath (concat path file)) (if (and (not (member file completions)) - (not (string-match ignored-extensions file)) + (not (and ignored-extensions + (string-match ignored-extensions file))) (or (string-equal path cwd) (not (file-directory-p filepath))) (or (null shell-completion-execonly)