[emacs-wiki-discuss] planner-deadline patch for bugfix

[Chris Parsons]

Hi all,

planner-deadline was refusing to set overdue dates on 'nil-dated' tasks
(something I have a lot of these days).  When patched,
planner-deadline-days-left returns a negative value not a nil value if
the deadline date is in the past on a nil-dated task.

The previous behaviour seems to have be explicitly added, so I'd be
interested if there was a particular reasoning for returning nil from
planner-deadline-days-left. The rest of the planner-deadline code
appears to assume the return value is always non-nil.

Here's the patch:

diff -u "c:/Program
Files/emacs/site-lisp/planner/planner-deadline.el.orig" "c:/Program
Files/emacs/site-lisp/planner/planner-deadline.el"
--- c:/Program Files/emacs/site-lisp/planner/planner-deadline.el.orig
2005-08-26 09:39:11.968750000 +0100
+++ c:/Program Files/emacs/site-lisp/planner/planner-deadline.el
2005-08-26 09:39:25.671875000 +0100
@@ -84,14 +84,13 @@
             (if (string-match planner-date-regexp (planner-page-name))
                 (planner-page-name)
               (planner-today))))
-    (unless (string< deadline (planner-today))
       (setq diff
             (- (calendar-absolute-from-gregorian
                 (planner-filename-to-calendar-date
                  deadline))
                (calendar-absolute-from-gregorian
                 (planner-filename-to-calendar-date
-                 date)))))
+                 date))))
     diff))

 (defun planner-deadline-calculate-string (deadline &optional date)

Diff finished.  Fri Aug 26 09:40:01 2005

Chris

-- 
Chris Parsons
address@hidden