diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2001-10-11 23:40:35 +0000 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2001-10-11 23:40:35 +0000 |
| commit | 138399e684c1d14a3bcf09bbe9cdedb7610e54cf (patch) | |
| tree | 5004d5020ae503480871d37ea1e70270af6ca89f /lisp/net | |
| parent | 3e5929af18d5ac7b1583cffec5e348fa9dcaa042 (diff) | |
| download | emacs-138399e684c1d14a3bcf09bbe9cdedb7610e54cf.tar.gz | |
(goto-address-mail-regexp): Allow + in username.
Diffstat (limited to 'lisp/net')
| -rw-r--r-- | lisp/net/goto-addr.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/net/goto-addr.el b/lisp/net/goto-addr.el index 61c615b4aca..9cb91eb6c2e 100644 --- a/lisp/net/goto-addr.el +++ b/lisp/net/goto-addr.el @@ -98,7 +98,8 @@ But only if `goto-address-highlight-p' is also non-nil." :group 'goto-address) (defvar goto-address-mail-regexp - "[-a-zA-Z0-9._]+@\\([-a-zA-z0-9_]+\\.\\)+[a-zA-Z0-9]+" + ;; Actually pretty much any char could appear in the username part. -stef + "[-a-zA-Z0-9._+]+@\\([-a-zA-z0-9_]+\\.\\)+[a-zA-Z0-9]+" "A regular expression probably matching an e-mail address.") (defvar goto-address-url-regexp thing-at-point-url-regexp |