diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-09-02 03:29:49 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-09-02 03:29:49 +0000 |
| commit | 9693d3c4a3f735395912387902debd22eb10e4b9 (patch) | |
| tree | dd38d103339108348a39862d3381cae58b807526 /lisp/gnus/nnspool.el | |
| parent | feefd9f3ddfd06ecadec89580aab9c247c9cfe3d (diff) | |
| download | emacs-9693d3c4a3f735395912387902debd22eb10e4b9.tar.gz emacs-9693d3c4a3f735395912387902debd22eb10e4b9.tar.bz2 emacs-9693d3c4a3f735395912387902debd22eb10e4b9.zip | |
Use gnus-float-time rather than time-to-seconds.
Diffstat (limited to 'lisp/gnus/nnspool.el')
| -rw-r--r-- | lisp/gnus/nnspool.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/gnus/nnspool.el b/lisp/gnus/nnspool.el index 38dfd60c942..6f8330f2080 100644 --- a/lisp/gnus/nnspool.el +++ b/lisp/gnus/nnspool.el @@ -1,7 +1,8 @@ ;;; nnspool.el --- spool access for GNU Emacs ;; Copyright (C) 1988, 1989, 1990, 1993, 1994, 1995, 1996, 1997, 1998, -;; 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 +;; Free Software Foundation, Inc. ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet> ;; Lars Magne Ingebrigtsen <larsi@gnus.org> @@ -288,7 +289,8 @@ there.") (while (and (not (looking-at "\\([^ ]+\\) +\\([0-9]+\\)[0-9][0-9][0-9] ")) (zerop (forward-line -1)))) - (let ((seconds (time-to-seconds (date-to-time date))) + ;; We require nnheader which requires gnus-util. + (let ((seconds (gnus-float-time (date-to-time date))) groups) ;; Go through lines and add the latest groups to a list. (while (and (looking-at "\\([^ ]+\\) +[0-9]+ ") |