From 7b86ef7dbb2e9e72e8fffcd2acec769f306a276d Mon Sep 17 00:00:00 2001
From: Luc Teirlinck <teirllm@auburn.edu>
Date: Thu, 25 Dec 2003 17:44:48 +0000
Subject: [PATCH] (ffap-read-file-or-url): Revert previous change.

---
 lisp/ffap.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/ffap.el b/lisp/ffap.el
index b249ce8daa0..668700a5c1f 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -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 (1+ (length dir))) guess)
+	     (if dir (cons guess (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)))
-- 
2.39.2