Mercurial > emacs

comparison lisp/gnus/gnus-sum.el @ 104803:2fb28585eb6b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use gnus-float-time rather than time-to-seconds.
author Glenn Morris <rgm@gnu.org>
date Wed, 02 Sep 2009 03:29:49 +0000
parents 9866b069527c
children 0504b0a2d425
comparison
equal deleted inserted replaced
104802:0b94fa0fdedb 104803:2fb28585eb6b
5000 (apply 'max 5000 (apply 'max
5001 (mapcar 5001 (mapcar
5002 (lambda (header) 5002 (lambda (header)
5003 (setq previous-time 5003 (setq previous-time
5004 (condition-case () 5004 (condition-case ()
5005 (time-to-seconds (mail-header-parse-date 5005 (gnus-float-time (mail-header-parse-date
5006 (mail-header-date header))) 5006 (mail-header-date header)))
5007 (error previous-time)))) 5007 (error previous-time))))
5008 (sort 5008 (sort
5009 (message-flatten-list thread) 5009 (message-flatten-list thread)
5010 (lambda (h1 h2) 5010 (lambda (h1 h2)