[Emacs-diffs] /srv/bzr/emacs/trunk r104375: Restrict regexp match in previous emacsbug.el change.

[Glenn Morris]

------------------------------------------------------------
revno: 104375
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Thu 2011-05-26 09:14:53 -0700
message:
  Restrict regexp match in previous emacsbug.el change.
modified:
  lisp/mail/emacsbug.el

=== modified file 'lisp/mail/emacsbug.el'
--- a/lisp/mail/emacsbug.el     2011-05-26 02:57:08 +0000
+++ b/lisp/mail/emacsbug.el     2011-05-26 16:14:53 +0000
@@ -352,8 +352,9 @@
                   ;; This is the default user-mail-address.  On today's
                   ;; systems, it seems more likely to be wrong than right,
                   ;; since most people don't run their own mail server.
-                  (string-match (format "\\<address@hidden>" (user-login-name)
-                                        (system-name))
+                  (string-match (format "\\<address@hidden>"
+                                        (regexp-quote (user-login-name))
+                                        (regexp-quote (system-name)))
                                 from))
               (not (yes-or-no-p
                     (format "Is `%s' really your email address? " from)))