X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnndiary.el;h=027d88887057243c734e151391bb0ccc06cccdef;hb=4b3bd6c2717eaec8fc48bf729db7ce9580d5bc24;hp=20a4c19bc43099a1042f48f75dfc03b9766189ab;hpb=b4bc300f0dcddc2b17bb50a3501ed6e6db1ef12c;p=gnus diff --git a/lisp/nndiary.el b/lisp/nndiary.el index 20a4c19bc..027d88887 100644 --- a/lisp/nndiary.el +++ b/lisp/nndiary.el @@ -1,6 +1,6 @@ ;;; nndiary.el --- A diary back end for Gnus -;; Copyright (C) 1999-2014 Free Software Foundation, Inc. +;; Copyright (C) 1999-2015 Free Software Foundation, Inc. ;; Author: Didier Verna ;; Maintainer: Didier Verna @@ -1314,6 +1314,8 @@ all. This may very well take some time.") res)) (sort res 'time-less-p))) +;; FIXME: "occurrence" is misspelled in this function name. + (defun nndiary-last-occurence (sched) ;; Returns the last occurrence of schedule SCHED as an Emacs time struct, or ;; nil for permanent schedule or errors. @@ -1394,6 +1396,8 @@ all. This may very well take some time.") nil)) )))) +;; FIXME: "occurrence" is misspelled in this function name. + (defun nndiary-next-occurence (sched now) ;; Returns the next occurrence of schedule SCHED, starting from time NOW. ;; If there's no next occurrence, returns the last one (if any) which is then