From: Glenn Morris <rgm@gnu.org>
Date: Thu, 26 May 2011 16:14:53 +0000 (-0700)
Subject: Restrict regexp match in previous emacsbug.el change.
X-Git-Tag: emacs-pretest-24.0.90~104^2~618^2~153
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fc6c27276c470a46cdce2a3f09e7968360b91584;p=emacs.git

Restrict regexp match in previous emacsbug.el change.
---

diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index 7d39edd39cd..8b3bca74555 100644
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -352,8 +352,9 @@ usually do not have translators to read other languages for them.\n\n")
 		   ;; 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 "\\<%s@%s\\>" (user-login-name)
-					 (system-name))
+		   (string-match (format "\\<%s@%s\\>"
+					 (regexp-quote (user-login-name))
+					 (regexp-quote (system-name)))
 				 from))
 	       (not (yes-or-no-p
 		     (format "Is `%s' really your email address? " from)))