Browse Source

Fix `org-at-property-p'

* lisp/org.el (org-at-property-p): Return nil when at the beginning of
  the properties drawer.
Nicolas Goaziou 10 năm trước cách đây
mục cha
commit
b4f9ee4eba
1 tập tin đã thay đổi với 3 bổ sung1 xóa
  1. 3 1
      lisp/org.el

+ 3 - 1
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."