From 54adaa4f9fbfb9583cd759ad0a58a71615bfd217 Mon Sep 17 00:00:00 2001 From: Carsten Dominik Date: Wed, 18 Feb 2009 01:04:34 +0100 Subject: [PATCH] Deadlines: Deal with "incorrect" positioning of warning period --- lisp/ChangeLog | 5 +++++ lisp/org.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index f84f064ac..350dd50e1 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-02-18 Carsten Dominik + + * org.el (org-get-wdays): Find the warning period also if it is in + the wrong place. + 2009-02-17 Carsten Dominik * org.el (org-olpath-completing-read): Never use ido for this diff --git a/lisp/org.el b/lisp/org.el index fb344c09c..c74e6c041 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -11779,7 +11779,7 @@ Don't touch the rest." ((<= org-deadline-warning-days 0) ;; 0 or negative, enforce this value no matter what (- org-deadline-warning-days)) - ((string-match "-\\([0-9]+\\)\\([dwmy]\\)\\(\\'\\|>\\)" ts) + ((string-match "-\\([0-9]+\\)\\([dwmy]\\)\\(\\'\\|>\\| \\)" ts) ;; lead time is specified. (floor (* (string-to-number (match-string 1 ts)) (cdr (assoc (match-string 2 ts)