Function: gnus-user-format-function-D

gnus-user-format-function-D is an autoloaded and byte-compiled function defined in gnus-diary.el.gz.

Signature

(gnus-user-format-function-D HEADER)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/gnus-diary.el.gz
;; #### NOTE: Gnus sometimes gives me a HEADER not corresponding to any
;; message, with all fields set to nil here. I don't know what it is for, and
;; I just ignore it.
;;;###autoload
(defun gnus-user-format-function-D (header)
  ;; Returns a formatted time string for the next occurrence of this message.
  (let* ((extras (mail-header-extra header))
	 (sched (gnus-diary-header-schedule extras))
	 (occur (nndiary-next-occurrence sched (current-time))))
    (format-time-string gnus-diary-time-format occur)))