Mercurial > emacs

changeset 44497:32d733dae726

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(file-name-non-special): Handle return value of t from `file-name-completion'.
author Andreas Schwab <schwab@suse.de>
date Thu, 11 Apr 2002 12:13:53 +0000
parents 9148e7fc1e39
children 371431e0ad14
files lisp/files.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/files.el	Thu Apr 11 07:16:13 2002 +0000
+++ b/lisp/files.el	Thu Apr 11 12:13:53 2002 +0000
@@ -3943,7 +3943,7 @@
 	(car arguments)
       (let ((value (apply operation arguments)))
 	(cond ((memq operation '(file-name-completion))
-	       (and value (concat "/:" value)))
+	       (and value (if (eq value t) t (concat "/:" value))))
 	      ((memq operation '(file-name-all-completions))
 	       (mapcar (lambda (name) (concat "/:" name)) value))
 	      (t value))))))