From 954121657160eceda61a8d52285ad594977c305e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 6 May 1994 23:59:28 +0000 Subject: [PATCH] (rmail-make-basic-summary-line): Show 14 chars before @ and 11 after. --- lisp/mail/rmailsum.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) 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) -- 2.39.5