diff options
| author | Raimon Grau | 2018-07-01 21:31:08 +0100 |
|---|---|---|
| committer | Noam Postavsky | 2018-07-29 12:07:07 -0400 |
| commit | dd514347140087112cdc632ac766a76fb4fe27f0 (patch) | |
| tree | df511c505afb3244392ef89b8d6139a681d94b5b | |
| parent | 39d3e8b6bc465df7a9400165a4d813af8af37237 (diff) | |
| download | emacs-dd514347140087112cdc632ac766a76fb4fe27f0.tar.gz emacs-dd514347140087112cdc632ac766a76fb4fe27f0.zip | |
Fix url's thing-at-point beginning-op (Bug#32028)
* lisp/thingatpt.el (url): Fix beginning-op making.
| -rw-r--r-- | lisp/thingatpt.el | 2 |
1 files changed, 1 insertions, 1 deletions
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 | |||
| 474 | 474 | ||
| 475 | (put 'url 'end-op (lambda () (end-of-thing 'url))) | 475 | (put 'url 'end-op (lambda () (end-of-thing 'url))) |
| 476 | 476 | ||
| 477 | (put 'url 'beginning-op (lambda () (end-of-thing 'url))) | 477 | (put 'url 'beginning-op (lambda () (beginning-of-thing 'url))) |
| 478 | 478 | ||
| 479 | ;; The normal thingatpt mechanism doesn't work for complex regexps. | 479 | ;; The normal thingatpt mechanism doesn't work for complex regexps. |
| 480 | ;; This should work for almost any regexp wherever we are in the | 480 | ;; This should work for almost any regexp wherever we are in the |