Function: gnus-advanced-date

gnus-advanced-date is a byte-compiled function defined in gnus-logic.el.gz.

Signature

(gnus-advanced-date INDEX MATCH TYPE)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-logic.el.gz
(defun gnus-advanced-date (index match type)
  (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))
     ((eq type 'before)
      (time-less-p match date))
     ((eq type 'after)
      (time-less-p date match))
     (t
      (error "No such date score type: %s" type)))))