emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/gnus/nnimap.el


From: Lute Kamstra
Subject: [Emacs-diffs] Changes to emacs/lisp/gnus/nnimap.el
Date: Mon, 11 Apr 2005 12:10:48 -0400

Index: emacs/lisp/gnus/nnimap.el
diff -c emacs/lisp/gnus/nnimap.el:1.24 emacs/lisp/gnus/nnimap.el:1.25
*** emacs/lisp/gnus/nnimap.el:1.24      Tue Apr  5 04:10:27 2005
--- emacs/lisp/gnus/nnimap.el   Mon Apr 11 16:10:48 2005
***************
*** 1386,1395 ****
        (list (- ms 1) (+ (expt 2 16) ls))
        (list ms ls))))
  
  (defun nnimap-date-days-ago (daysago)
    "Return date, in format \"3-Aug-1998\", for DAYSAGO days ago."
    (require 'parse-time)
-   (defvar parse-time-months)
    (let* ((time (nnimap-time-substract (current-time) (days-to-time daysago)))
         (date (format-time-string
                (format "%%d-%s-%%Y"
--- 1386,1395 ----
        (list (- ms 1) (+ (expt 2 16) ls))
        (list ms ls))))
  
+ (eval-when-compile (require 'parse-time))
  (defun nnimap-date-days-ago (daysago)
    "Return date, in format \"3-Aug-1998\", for DAYSAGO days ago."
    (require 'parse-time)
    (let* ((time (nnimap-time-substract (current-time) (days-to-time daysago)))
         (date (format-time-string
                (format "%%d-%s-%%Y"




reply via email to

[Prev in Thread] Current Thread [Next in Thread]