ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Deadlines: Deal with "incorrect" positioning of warning period

This commit is contained in:
Carsten Dominik 2009-02-18 01:04:34 +01:00
parent 950334edb3
commit 54adaa4f9f
2 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2009-02-18 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-get-wdays): Find the warning period also if it is in
the wrong place.
2009-02-17 Carsten Dominik <carsten.dominik@gmail.com> 2009-02-17 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-olpath-completing-read): Never use ido for this * org.el (org-olpath-completing-read): Never use ido for this

2
lisp/org.el
View File

@ -11779,7 +11779,7 @@ Don't touch the rest."
((<= org-deadline-warning-days 0) ((<= org-deadline-warning-days 0)
;; 0 or negative, enforce this value no matter what ;; 0 or negative, enforce this value no matter what
(- org-deadline-warning-days)) (- org-deadline-warning-days))
((string-match "-\\([0-9]+\\)\\([dwmy]\\)\\(\\'\\|>\\)" ts) ((string-match "-\\([0-9]+\\)\\([dwmy]\\)\\(\\'\\|>\\| \\)" ts)
;; lead time is specified. ;; lead time is specified.
(floor (* (string-to-number (match-string 1 ts)) (floor (* (string-to-number (match-string 1 ts))
(cdr (assoc (match-string 2 ts) (cdr (assoc (match-string 2 ts)