[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master ff20898dad8: Add slashes to 'thing-at-point-email-regexp'

From: Philip Kaludercic
Subject: master ff20898dad8: Add slashes to 'thing-at-point-email-regexp'
Date: Sun, 17 Dec 2023 07:11:09 -0500 (EST)

branch: master
commit ff20898dad8825fb39883ca3f09f829528291943
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    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)
 lisp/thingatpt.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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.")

reply via email to

[Prev in Thread] Current Thread [Next in Thread]