From 4d629b4832d1193e353e950ce0552b4e78d71c12 Mon Sep 17 00:00:00 2001 From: Reiner Steib Date: Mon, 26 Jun 2006 13:55:23 +0000 Subject: [PATCH] (gnus-user-format-function-d) (gnus-user-format-function-D): Autoload. --- lisp/ChangeLog | 3 +++ lisp/gnus-diary.el | 2 ++ 2 files changed, 5 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 21fc2efac..2a5f423cc 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2006-06-26 Reiner Steib + * gnus-diary.el (gnus-user-format-function-d) + (gnus-user-format-function-D): Autoload. + * imap.el (Commentary): Fix typo. * gnus-util.el (kill-empty-logs, gnus-byte-compile): Remove anonymous diff --git a/lisp/gnus-diary.el b/lisp/gnus-diary.el index f49f5b48a..4dc10501e 100644 --- a/lisp/gnus-diary.el +++ b/lisp/gnus-diary.el @@ -158,6 +158,7 @@ There are currently two built-in format functions: ;; #### 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 an aproximative delay string for the next occurence of this ;; message. The delay is given only in the first non zero unit. @@ -194,6 +195,7 @@ There are currently two built-in format functions: ;; #### 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 occurence of this message. (let* ((extras (mail-header-extra header)) -- 2.34.1