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)