diff options
Diffstat (limited to 'lisp/mh-e/mh-xface.el')
-rw-r--r-- | lisp/mh-e/mh-xface.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/mh-e/mh-xface.el b/lisp/mh-e/mh-xface.el index 9a03fef1108..4ff84a66f76 100644 --- a/lisp/mh-e/mh-xface.el +++ b/lisp/mh-e/mh-xface.el @@ -3,7 +3,6 @@ ;; Copyright (C) 2002-2003, 2005-2019 Free Software Foundation, Inc. ;; Author: Bill Wohler <wohler@newt.com> -;; Maintainer: Bill Wohler <wohler@newt.com> ;; Keywords: mail ;; See: mh-e.el @@ -197,7 +196,7 @@ The directories are searched for in the order they appear in the list.") (mh-funcall-if-exists ietf-drums-parse-address from-field)))) (host (and from - (string-match "\\([^+]*\\)\\(+.*\\)?@\\(.*\\)" from) + (string-match "\\([^+]*\\)\\(\\+.*\\)?@\\(.*\\)" from) (downcase (match-string 3 from)))) (user (and host (downcase (match-string 1 from)))) (canonical-address (format "%s@%s" user host)) |