From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 6 May 1994 23:59:28 +0000 (+0000)
Subject: (rmail-make-basic-summary-line): Show 14 chars before @ and 11 after.
X-Git-Tag: emacs-19.34~8485
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=954121657160eceda61a8d52285ad594977c305e;p=emacs.git

(rmail-make-basic-summary-line): Show 14 chars before @ and 11 after.
---

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index 3ea44ef0289..34ee023c9c7 100644
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -334,10 +334,10 @@ nil for FUNCTION means all messages."
 			(if (or (not mch) (<= len 25))
 			    (substring from (max 0 (- len 25)))
 			  (substring from
-				     (setq lo (cond ((< (- mch 9) 0) 0)
-						    ((< len (+ mch 16))
+				     (setq lo (cond ((< (- mch 14) 0) 0)
+						    ((< len (+ mch 11))
 						     (- len 25))
-						    (t (- mch 9))))
+						    (t (- mch 14))))
 				     (min len (+ lo 25))))))))
 	  "  #"
 	  (if (re-search-forward "^Subject:" nil t)