summaryrefslogtreecommitdiff
path: root/lisp/thingatpt.el
diff options
context:
space:
mode:
authorPhilip Kaludercic <philipk@posteo.net>2023-12-03 13:49:07 +0100
committerPhilip Kaludercic <philipk@posteo.net>2023-12-17 13:07:30 +0100
commitff20898dad8825fb39883ca3f09f829528291943 (patch)
treed9bad9ee3487d4f7a608d14ff02f1d73bcb07598 /lisp/thingatpt.el
parent7b46b24d3902dc43d920daf670e8c2b560a6ee45 (diff)
downloademacs-ff20898dad8825fb39883ca3f09f829528291943.tar.gz
Add slashes to 'thing-at-point-email-regexp'
* lisp/thingatpt.el (thing-at-point-email-regexp): Allow for a (thing-at-point 'email) query to match addresses with slashes, as used by Sourcehut. (Bug#67600)
Diffstat (limited to 'lisp/thingatpt.el')
-rw-r--r--lisp/thingatpt.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el
index 88efbf73beb..80dc5ee60b7 100644
--- a/lisp/thingatpt.el
+++ b/lisp/thingatpt.el
@@ -652,7 +652,7 @@ back from point."
;; Email addresses
(defvar thing-at-point-email-regexp
- "<?[-+_~a-zA-Z0-9][-+_.~:a-zA-Z0-9]*@[-a-zA-Z0-9]+[-.a-zA-Z0-9]*>?"
+ "<?[-+_~a-zA-Z0-9/][-+_.~:a-zA-Z0-9/]*@[-a-zA-Z0-9]+[-.a-zA-Z0-9]*>?"
"A regular expression probably matching an email address.
This does not match the real name portion, only the address, optionally
with angle brackets.")