From b4f9ee4eba11ef86891cf1f04c277ce9b03ef649 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Tue, 7 Apr 2015 00:08:31 +0200 Subject: [PATCH] Fix `org-at-property-p' * lisp/org.el (org-at-property-p): Return nil when at the beginning of the properties drawer. --- lisp/org.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/org.el b/lisp/org.el index 5ea06b2ee..bec964047 100755 --- a/lisp/org.el +++ b/lisp/org.el @@ -15542,7 +15542,9 @@ See `org-property-re' for match data, if applicable." (beginning-of-line) (and (looking-at org-property-re) (let ((property-drawer (save-match-data (org-get-property-block)))) - (and property-drawer (< (point) (cdr property-drawer))))))) + (and property-drawer + (> (point) (car property-drawer)) + (< (point) (cdr property-drawer))))))) (defun org-property-action () "Do an action on properties."