changeset 53261:cfde5f632759

(ffap-read-file-or-url): Eliminate reliance of the call to `completing-read' on a recently fixed bug.
author Luc Teirlinck <teirllm@auburn.edu>
date Wed, 24 Dec 2003 02:07:48 +0000
parents 13c65f47de38
children b18fd10266de
files lisp/ffap.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ffap.el	Wed Dec 24 00:21:03 2003 +0000
+++ b/lisp/ffap.el	Wed Dec 24 02:07:48 2003 +0000
@@ -1216,7 +1216,7 @@
 	     '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)))