From 08396566192b74313baa4e1cdfd552c5cd21cea4 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Fri, 28 Jan 2011 01:41:15 +0000 Subject: [PATCH] gnus-art.el (article-make-date-line): Limit the length a bit more. gnus.texi (Article Date): Document gnus-article-update-lapsed-header. --- doc/misc/ChangeLog | 4 ++++ doc/misc/gnus.texi | 11 ++++++----- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/gnus-art.el | 2 +- 4 files changed, 15 insertions(+), 6 deletions(-) diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog index a9edb186ed5..3352ef13fff 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 ffeeabe4564..097b4caa406 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) -- 2.11.4.GIT