Mercurial > emacs

changeset 61042:31060527396c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(PC-read-include-file-name-internal): Use test-completion.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 28 Mar 2005 19:33:45 +0000
parents 7c41b8d87504
children 9306183f7d44
files lisp/complete.el
diffstat 1 files changed, 2 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/complete.el	Mon Mar 28 17:33:37 2005 +0000
+++ b/lisp/complete.el	Mon Mar 28 19:33:45 2005 +0000
@@ -937,12 +937,11 @@
 	 ((not completion-table) nil)
 	 ((eq action nil) (try-completion str2 completion-table nil))
 	 ((eq action t) (all-completions str2 completion-table nil))
-	 ((eq action 'lambda)
-	  (eq (try-completion str2 completion-table nil) t))))
+	 ((eq action 'lambda) (test-completion str2 completion-table nil))))
     (funcall PC-old-read-file-name-internal string dir action)))
 
 
 (provide 'complete)
 
-;;; arch-tag: fc7e2768-ff44-4e22-b579-4d825b968458
+;; arch-tag: fc7e2768-ff44-4e22-b579-4d825b968458
 ;;; complete.el ends here