]> code.delx.au - gnu-emacs/commitdiff
Fix a thinko in 'ffap-gopher-at-point'
authorEli Zaretskii <eliz@gnu.org>
Sat, 1 Aug 2015 09:33:48 +0000 (12:33 +0300)
committerEli Zaretskii <eliz@gnu.org>
Sat, 1 Aug 2015 09:33:48 +0000 (12:33 +0300)
* lisp/ffap.el (ffap-gopher-at-point): Fix last change.  (Bug#21168)

lisp/ffap.el

index c0ab1af80f53510c5a5933781e0dcd948947a47e..825a449955f75521163bdc8f3234733edbfba9a7 100644 (file)
@@ -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)))