Mercurial > emacs
diff lisp/complete.el @ 61042:31060527396c
(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 | 242e5edee3ce |
children | 6fb026ad601f 4da4a09e8b1b |
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