From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/5090 Path: main.gmane.org!not-for-mail From: Jason L Tibbitts III Newsgroups: gmane.emacs.gnus.general Subject: Re: date group last read Date: Mon, 12 Feb 1996 17:15:31 -0600 Message-ID: <199602122315.RAA18152@sina.hpc.uh.edu> References: <6593.823887034@ibcinc.com> <199602111807.KAA16663@edmonds.home.cs.ubc.ca> <199602120636.AAA25639@sina.hpc.uh.edu> Reply-To: Jason L Tibbitts III NNTP-Posting-Host: coloc-standby.netfonds.no X-Trace: main.gmane.org 1035145742 31769 80.91.224.250 (20 Oct 2002 20:29:02 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 20:29:02 +0000 (UTC) Cc: roderick@gate.net Return-Path: ding-request@ifi.uio.no Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by miranova.com (8.7.3/8.6.9) with SMTP id QAA07022 for ; Mon, 12 Feb 1996 16:08:41 -0800 Original-Received: from sina.hpc.uh.edu (Sina.HPC.UH.EDU [129.7.3.5]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) id for ; Tue, 13 Feb 1996 00:15:36 +0100 Original-Received: from sina.hpc.uh.edu (localhost [127.0.0.1]) by sina.hpc.uh.edu (8.7.3/8.7.3) with ESMTP id RAA18152; Mon, 12 Feb 1996 17:15:31 -0600 (CST) In-Reply-To: larsi@ifi.uio.no's message of 12 Feb 1996 19:22:28 +0100 Original-To: ding@ifi.uio.no Gcc: nnfolder:misc-mail Xref: main.gmane.org gmane.emacs.gnus.general:5090 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:5090 >>>>> "LMI" == Lars Magne Ingebrigtsen writes: LMI> Yup. I've now added this to the Red Gnus todo list. It's pretty easy to do externally (no gnus changes required). This has been tested lightly. (I'm using it at the moment.) Comments on my lisp are encouraged; I'm actually trying to learn it properly now. Add the following to .gnus, and add "%ud" somewhere in gnus-group-line-format. (add-hook 'gnus-select-group-hook (lambda () (gnus-group-add-parameter group (cons 'gnus-group-date-last-entered (list (current-time-string)))))) (defun gnus-user-format-function-d (headers) "Return the date the group was last read." (cond ((car (gnus-group-get-parameter gnus-tmp-group 'gnus-group-date-last-entered))) (t ""))) - J<