[4545] in SIPB bug reports
gnus functions missing
daemon@ATHENA.MIT.EDU (mjbauer@MIT.EDU)
Sun Apr 17 08:17:11 1994
From: mjbauer@MIT.EDU
Date: Sun, 17 Apr 94 08:16:23 -0400
To: bug-sipb@MIT.EDU
Greetings:
The following bit of code should sort news subjects by date, and then
by subject -- this makes things "threaded", which is a Nice Thing.
I've checked, and at least gnus-keysort-headers, gnus-sortable-date,
and gnus-header-date all do not exist.
Can we get more up-to-date files, or can someone point me at elisp
repositories other than /afs/sipb.mit.edu/contrib/emacs/elisp or
/usr/sipb/lib/elisp.
MJB
-------------------------------------------------------------------------------
(setq gnus-select-group-hook
'(lambda ()
;; First of all, sort by date.
(gnus-keysort-headers
(function string-lessp)
(function
(lambda (a)
(gnus-sortable-date (gnus-header-date a)))))
;; Then sort by subject ignoring `Re:'.
(gnus-keysort-headers
(function string-lessp)
(function
(lambda (a)
(if case-fold-search
(downcase (gnus-simplify-subject (gnus-header-subject a) t))
(gnus-simplify-subject (gnus-header-subject a) t)))))
))
