ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix `org-at-property-p' 

* lisp/org.el (org-at-property-p): Return nil when at the beginning of
  the properties drawer.
This commit is contained in:
Nicolas Goaziou 2015-04-07 00:08:31 +02:00
parent 94c7619579
commit b4f9ee4eba
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org.el
View File

@ -15542,7 +15542,9 @@ See `org-property-re' for match data, if applicable."
(beginning-of-line) (beginning-of-line)
(and (looking-at org-property-re) (and (looking-at org-property-re)
(let ((property-drawer (save-match-data (org-get-property-block)))) (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 () (defun org-property-action ()
"Do an action on properties." "Do an action on properties."