From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 1 Aug 2015 09:33:48 +0000 (+0300)
Subject: Fix a thinko in 'ffap-gopher-at-point'
X-Git-Tag: emacs-25.0.90~1399
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e663cfec5a2dbf69d0f4360e1f8e05f81a037333;p=emacs.git

Fix a thinko in 'ffap-gopher-at-point'

* lisp/ffap.el (ffap-gopher-at-point): Fix last change.  (Bug#21168)
---

diff --git a/lisp/ffap.el b/lisp/ffap.el
index c0ab1af80f5..825a449955f 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -1134,7 +1134,7 @@ Sets the variable `ffap-string-at-point-region' to the bounds of URL, if any."
 					   (match-end 2))))
 		(set var val)
 		(forward-line 1)))
-            (setcdr ffap-string-at-point-region (point))
+            (setcdr ffap-string-at-point-region (list (point)))
 	    (if (and path (string-match "^ftp:.*@" path))
 		(concat "ftp://"
 			(substring path 4 (1- (match-end 0)))