* Damien Wyart <[email protected]> : Wrote on Fri, 08 Apr 2011 18:18:48 +0200:
| * Richard Riley <[email protected]> in gnu.emacs.gnus: |> > (setq gnus-article-date-headers 'original) |> > (setq gnus-article-update-date-headers nil) | |> That removes the lapsed altogether. I think the direction was more to |> keep lapsed (not animated) but not include seconds or? | |> e.g combined-lapsed without the seconds would be nice. | | Yes, that might be closer to what the op would like. After some source | reading, it looks like that would require quite deep hacking inside | article-lapsed-string, so I can't propose a working solution quickly. Turns out there an easy kludge to hide the seconds: diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 9767798..ca9c17a 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el @@ -3588,6 +3588,7 @@ possible values." ;; through the time units for years, weeks, etc, ;; and divide things to see whether that results ;; in positive answers. + (let ((article-time-units (butlast article-time-units))) (mapconcat (lambda (unit) (if (or (zerop (setq num (ffloor (/ sec (cdr unit))))) @@ -3604,7 +3605,7 @@ possible values." (if (> num 1) "s" "")) (setq prev t segments (1+ segments))))) - article-time-units "") + article-time-units "")) ;; If dates are odd, then it might appear like the ;; article was sent in the future. (if (> real-sec 0) _______________________________________________ info-gnus-english mailing list [email protected] https://lists.gnu.org/mailman/listinfo/info-gnus-english
