From e663cfec5a2dbf69d0f4360e1f8e05f81a037333 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 1 Aug 2015 12:33:48 +0300 Subject: [PATCH] Fix a thinko in 'ffap-gopher-at-point' * lisp/ffap.el (ffap-gopher-at-point): Fix last change. (Bug#21168) --- lisp/ffap.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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))) -- 2.39.2