From 7b2db0a01378d9f6eb0087161546249f3900890e Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Thu, 14 Apr 1994 19:19:30 +0000 Subject: [PATCH] (shell-dynamic-complete-as-command): Don't match ignored-extensions if it's nil. --- lisp/shell.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/shell.el b/lisp/shell.el index 644c43c560..b0bb9db978 100644 --- a/lisp/shell.el +++ b/lisp/shell.el @@ -702,7 +702,8 @@ See `shell-dynamic-complete-filename'. Returns t if successful." (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) -- 2.20.1