summaryrefslogtreecommitdiff
path: root/lisp/gnus/gnus-logic.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/gnus/gnus-logic.el')
-rw-r--r--lisp/gnus/gnus-logic.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/gnus/gnus-logic.el b/lisp/gnus/gnus-logic.el
index fa9d9306963..90f74205209 100644
--- a/lisp/gnus/gnus-logic.el
+++ b/lisp/gnus/gnus-logic.el
@@ -24,7 +24,7 @@
;;; Code:
-(eval-when-compile (require 'cl))
+(eval-when-compile (require 'cl-lib))
(require 'gnus)
(require 'gnus-score)
@@ -162,9 +162,9 @@
(funcall type (or (aref gnus-advanced-headers index) 0) match)))
(defun gnus-advanced-date (index match type)
- (let ((date (apply 'encode-time (parse-time-string
- (aref gnus-advanced-headers index))))
- (match (apply 'encode-time (parse-time-string match))))
+ (let ((date (encode-time (parse-time-string
+ (aref gnus-advanced-headers index))))
+ (match (encode-time (parse-time-string match))))
(cond
((eq type 'at)
(equal date match))