diff options
author | John K. Luebs <jkluebs@luebsphoto.com> | 2013-02-05 00:09:19 +0100 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-02-05 00:10:05 +0100 |
commit | f27e1e8e4d6ffd3f92287a4a9122e752238c1bb3 (patch) | |
tree | 417f2d50fae1700383c8f2df9c021e47493ad8e9 | |
parent | 80cb1b0a09f53ae9a6dd37c7884ec6a26e29e12c (diff) | |
download | org-mode-f27e1e8e4d6ffd3f92287a4a9122e752238c1bb3.tar.gz |
org.el (org-get-wdays): Handle matching a lead time specified in hours
* org.el (org-get-wdays): Handle matching a lead time specified in
hours.
TINYCHANGE
A lead time in hours is matched but will erroneously return nil.
-rw-r--r-- | lisp/org.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org.el b/lisp/org.el index ca751a7..bba52a8 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -15921,7 +15921,8 @@ Don't touch the rest." (floor (* (string-to-number (match-string 1 ts)) (cdr (assoc (match-string 2 ts) '(("d" . 1) ("w" . 7) - ("m" . 30.4) ("y" . 365.25))))))) + ("m" . 30.4) ("y" . 365.25) + ("h" . 0.041667))))))) ;; go for the default. (t org-deadline-warning-days))) |