1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 18:40:39 -08:00

(ffap-read-file-or-url): Eliminate reliance of the call to

`completing-read' on a recently fixed bug.
This commit is contained in:
Luc Teirlinck 2003-12-24 02:07:48 +00:00
parent 000eeb1587
commit 220898759c

View file

@ -1216,7 +1216,7 @@ which may actually result in an url rather than a filename."
'ffap-read-file-or-url-internal
dir
nil
(if dir (cons guess (length dir)) guess)
(if dir (cons guess (1+ (length dir))) guess)
(list 'file-name-history))))
;; Do file substitution like (interactive "F"), suggested by MCOOK.
(or (ffap-url-p guess) (setq guess (substitute-in-file-name guess)))