From dd514347140087112cdc632ac766a76fb4fe27f0 Mon Sep 17 00:00:00 2001 From: Raimon Grau Date: Sun, 1 Jul 2018 21:31:08 +0100 Subject: [PATCH] Fix url's thing-at-point beginning-op (Bug#32028) * lisp/thingatpt.el (url): Fix beginning-op making. --- lisp/thingatpt.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el index 7fe99b0714c..6a978fe96ef 100644 --- a/lisp/thingatpt.el +++ b/lisp/thingatpt.el @@ -474,7 +474,7 @@ looks like an email address, \"ftp://\" if it starts with (put 'url 'end-op (lambda () (end-of-thing 'url))) -(put 'url 'beginning-op (lambda () (end-of-thing 'url))) +(put 'url 'beginning-op (lambda () (beginning-of-thing 'url))) ;; The normal thingatpt mechanism doesn't work for complex regexps. ;; This should work for almost any regexp wherever we are in the -- 2.39.2