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)