[Emacs-diffs] /srv/bzr/emacs/trunk r103001: gnus-art.el (article-make-date-line): Limit the length a bit more.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 103001
author: Lars Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Fri 2011-01-28 01:41:15 +0000
message:
  gnus-art.el (article-make-date-line): Limit the length a bit more.
  gnus.texi (Article Date): Document gnus-article-update-lapsed-header.
modified:
  doc/misc/ChangeLog
  doc/misc/gnus.texi
  lisp/gnus/ChangeLog
  lisp/gnus/gnus-art.el

=== modified file 'doc/misc/ChangeLog'
--- a/doc/misc/ChangeLog        2011-01-26 08:36:39 +0000
+++ b/doc/misc/ChangeLog        2011-01-28 01:41:15 +0000
@@ -1,3 +1,7 @@
+2011-01-26  Lars Ingebrigtsen  <address@hidden>
+
+       * gnus.texi (Article Date): Document gnus-article-update-lapsed-header.
+
 2011-01-24  Teodor Zlatanov  <address@hidden>
 
        * message.texi (IDNA): Explain what it is.

=== modified file 'doc/misc/gnus.texi'
--- a/doc/misc/gnus.texi        2011-01-25 04:08:28 +0000
+++ b/doc/misc/gnus.texi        2011-01-28 01:41:15 +0000
@@ -9503,15 +9503,16 @@
 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:
 
address@hidden 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)

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2011-01-28 01:34:09 +0000
+++ b/lisp/gnus/ChangeLog       2011-01-28 01:41:15 +0000
@@ -1,3 +1,7 @@
+2011-01-28  Lars Ingebrigtsen  <address@hidden>
+
+       * gnus-art.el (article-make-date-line): Limit the length a bit more.
+
 2011-01-28  Daiki Ueno  <address@hidden>
 
        * mml2015.el (mml2015-epg-sign, mml2015-epg-encrypt): Give

=== modified file 'lisp/gnus/gnus-art.el'
--- a/lisp/gnus/gnus-art.el     2011-01-27 23:42:38 +0000
+++ b/lisp/gnus/gnus-art.el     2011-01-28 01:41:15 +0000
@@ -3578,7 +3578,7 @@
                          (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)