# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1104163848 0
# Node ID 7aa5e44f673fcc47ee8e61f3c525fb4b6e423ac0
# Parent  dc790c155f8a931b80437402fba66390695edfdd
(goto-address-mail-regexp): Allow = in username.

diff -r dc790c155f8a -r 7aa5e44f673f lisp/net/goto-addr.el
--- a/lisp/net/goto-addr.el	Mon Dec 27 16:09:37 2004 +0000
+++ b/lisp/net/goto-addr.el	Mon Dec 27 16:10:48 2004 +0000
@@ -100,7 +100,7 @@
 
 (defvar goto-address-mail-regexp
   ;; 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-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