From 7b333c72493a66eac35d9246fb689b6f18cbd2e7 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Tue, 2 Jun 2015 15:39:50 +0200 Subject: [PATCH] Fix typo * lisp/org.el (org-check-before-date): (org-check-after-date): (org-check-dates-range): Fix typo. Reported-by: Michael Strey --- lisp/org.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 259421715..510c6432a 100755 --- a/lisp/org.el +++ b/lisp/org.el @@ -17415,7 +17415,7 @@ both scheduled and deadline timestamps." (callback `(lambda () (and ,(if (memq org-ts-type '(active inactive all)) - '(eq (org-element-type (org-element-context) 'timestamp)) + '(eq (org-element-type (org-element-context)) 'timestamp) '(org-at-planning-p)) (time-less-p (org-time-string-to-time (match-string 1)) @@ -17431,7 +17431,7 @@ both scheduled and deadline timestamps." (callback `(lambda () (and ,(if (memq org-ts-type '(active inactive all)) - '(eq (org-element-type (org-element-context) 'timestamp)) + '(eq (org-element-type (org-element-context)) 'timestamp) '(org-at-planning-p)) (not (time-less-p (org-time-string-to-time (match-string 1)) @@ -17450,7 +17450,7 @@ both scheduled and deadline timestamps." (let ((match (match-string 1))) (and ,(if (memq org-ts-type '(active inactive all)) - '(eq (org-element-type (org-element-context) 'timestamp)) + '(eq (org-element-type (org-element-context)) 'timestamp) '(org-at-planning-p)) (not (time-less-p (org-time-string-to-time match) -- 2.11.4.GIT