From fc6c27276c470a46cdce2a3f09e7968360b91584 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Thu, 26 May 2011 09:14:53 -0700 Subject: [PATCH] Restrict regexp match in previous emacsbug.el change. --- lisp/mail/emacsbug.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) 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))) -- 2.39.2