changeset 13809:db6a50dd1257

(rmail-make-basic-summary-line): Recognize user-mail-address in From field means msg is from you.
author Karl Heuer <kwzh@gnu.org>
date Thu, 21 Dec 1995 18:07:18 +0000
parents 308a47d72b19
children 64679d67fde9
files lisp/mail/rmailsum.el
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmailsum.el	Thu Dec 21 18:02:18 1995 +0000
+++ b/lisp/mail/rmailsum.el	Thu Dec 21 18:07:18 1995 +0000
@@ -348,9 +348,11 @@
 			       (skip-chars-backward " \t")
 			       (point)))))
                      len mch lo)
-		(if (string-match (concat "^"
+		(if (string-match (concat "^\\("
 					  (regexp-quote (user-login-name))
-					  "\\($\\|@\\)")
+					  "\\($\\|@\\)\\|"
+					  (regexp-quote user-mail-address)
+					  "\\>\\)")
 				  from)
 		    (save-excursion
 		      (goto-char (point-min))