From mboxrd@z Thu Jan 1 00:00:00 1970 From: "John K. Luebs" Subject: [PATCH] Fix error handling deadline lead time specified in hours Date: Fri, 01 Feb 2013 15:56:54 -0500 Message-ID: <1359752214-14239-1-git-send-email-jkluebs@luebsphoto.com> Return-path: Received: from eggs.gnu.org ([208.118.235.92]:54658) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U1Njs-00063X-4i for emacs-orgmode@gnu.org; Fri, 01 Feb 2013 16:02:42 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1U1Nfu-0005hN-8O for emacs-orgmode@gnu.org; Fri, 01 Feb 2013 16:01:36 -0500 Received: from vms173001pub.verizon.net ([206.46.173.1]:56425) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1U1Nfu-0005gY-2T for emacs-orgmode@gnu.org; Fri, 01 Feb 2013 15:57:30 -0500 Received: from rikea.luebsdom.net ([unknown] [96.236.225.44]) by vms173001.mailsrvcs.net (Sun Java(tm) System Messaging Server 7u2-7.02 32bit (built Apr 16 2009)) with ESMTPA id <0MHK009MX7IVVD32@vms173001.mailsrvcs.net> for emacs-orgmode@gnu.org; Fri, 01 Feb 2013 14:57:02 -0600 (CST) List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org Cc: "John K. Luebs" From: "John K. Luebs" * lisp/org.el (org-get-wdays): Handle matching a lead time specified in hours, which is matched by the current regexp but will erroneously return nil. TINYCHANGE --- lisp/org.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/org.el b/lisp/org.el index 310972b..e9353f6 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -16227,7 +16227,8 @@ If SECONDS is non-nil, return the difference in seconds." (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))) -- 1.8.1.2