Commit 414a17c9 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(read-file-name-internal): Don't add the final > if the completion is not

finished (re-application of this patch, which was accidentally undone by Eli).
parent 255523e9
2007-03-21 Stefan Monnier <monnier@iro.umontreal.ca>
* complete.el (read-file-name-internal): Don't add the final > if the
completion is not finished (re-application of this patch, which was
accidentally undone by Eli).
2007-03-21 Chong Yidong <cyd@stupidchicken.com>
 
* emulation/viper.el (viper-non-hook-settings): Handle mouse
......@@ -1026,10 +1026,11 @@ absolute rather than relative to some directory on the SEARCH-PATH."
(if (string-match "<\\([^\"<>]*\\)>?\\'" (ad-get-arg 0))
(let* ((string (ad-get-arg 0))
(action (ad-get-arg 2))
(name (substring string (match-beginning 1) (match-end 1)))
(name (match-string 1 string))
(str2 (substring string (match-beginning 0)))
(completion-table
(mapcar (lambda (x) (format "<%s>" x))
(mapcar (lambda (x)
(format (if (string-match "/\\'" x) "<%s" "<%s>") x))
(PC-include-file-all-completions
name (PC-include-file-path)))))
(setq ad-return-value
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment