From: Lars Ingebrigtsen Date: Fri, 28 Jan 2011 01:41:15 +0000 (+0000) Subject: gnus-art.el (article-make-date-line): Limit the length a bit more. X-Git-Tag: emacs-pretest-24.0.90~104^2~618^2~1322^2~103 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d6f13ac8765373d96bb89a23ee6378c7cd72c402;p=emacs.git gnus-art.el (article-make-date-line): Limit the length a bit more. gnus.texi (Article Date): Document gnus-article-update-lapsed-header. --- 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 + + * gnus.texi (Article Date): Document gnus-article-update-lapsed-header. + 2011-01-24 Teodor Zlatanov * 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 + + * gnus-art.el (article-make-date-line): Limit the length a bit more. + 2011-01-28 Daiki Ueno * 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)