Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
a7ad0079
Commit
a7ad0079
authored
Mar 28, 2005
by
Stefan Monnier
Browse files
(PC-read-include-file-name-internal): Use test-completion.
parent
5e472af0
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
2 additions
and
3 deletions
+2
-3
lisp/complete.el
lisp/complete.el
+2
-3
No files found.
lisp/complete.el
View file @
a7ad0079
...
...
@@ -937,12 +937,11 @@ absolute rather than relative to some directory on the SEARCH-PATH."
((
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
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment