gnus-art.el (article-make-date-line): Limit the length a bit more.

gnus.texi (Article Date): Document gnus-article-update-lapsed-header.

4 files changed, 15 insertions, 6 deletions

diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog
index a8a9ca6772b..c37affbf87c 100644
--- a/doc/misc/ChangeLog
+++ b/doc/misc/ChangeLog
@@ -1,3 +1,7 @@
+2011-01-26  Lars Ingebrigtsen  <larsi@gnus.org>
+
+        * gnus.texi (Article Date): Document gnus-article-update-lapsed-header.
+
 2011-01-24  Teodor Zlatanov  <tzz@lifelogs.com>
 
         * message.texi (IDNA): Explain what it is.
diff --git a/doc/misc/gnus.texi b/doc/misc/gnus.texi
index 45aa3f11261..463a1e0af55 100644
--- a/doc/misc/gnus.texi
+++ b/doc/misc/gnus.texi
@@ -9503,15 +9503,16 @@ replace it.
 An advantage of using Gnus to read mail is that it converts simple bugs
 into wonderful absurdities.
 
-If you want to have this line updated continually, you can put
+This line is updated continually by default.  If you wish to switch
+that off, say:
 
+@vindex gnus-article-update-lapsed-header
 @lisp
-(gnus-start-date-timer)
+(setq gnus-article-update-lapsed-header nil)
 @end lisp
 
-in your @file{~/.gnus.el} file, or you can run it off of some hook.  If
-you want to stop the timer, you can use the @code{gnus-stop-date-timer}
-command.
+in your @file{~/.gnus.el} file.  If you want to stop the updating
+dynamically, you can use the @code{gnus-stop-date-timer} command.
 
 @item W T o
 @kindex W T o (Summary)
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 66373f5bbbc..29939cc165a 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2011-01-28  Lars Ingebrigtsen  <larsi@gnus.org>
+
+        * gnus-art.el (article-make-date-line): Limit the length a bit more.
+
 2011-01-28  Daiki Ueno  <ueno@unixuser.org>
 
         * mml2015.el (mml2015-epg-sign, mml2015-epg-encrypt): Give
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el
index 2960e8f8e27..bde599c5f04 100644
--- a/lisp/gnus/gnus-art.el
+++ b/lisp/gnus/gnus-art.el
@@ -3578,7 +3578,7 @@ should replace the \"Date:\" one, or should be added below it."
                           (concat " (" (article-lapsed-string time segments) ")"))
                     (> (+ (length date-string)
                           (length lapsed-string))
-                       (+ fill-column 10))
+                       (+ fill-column 6))
                     (> segments 0))
               (setq segments (1- segments)))
             (if (> segments 0)