summaryrefslogtreecommitdiff
path: root/lisp/org-pcomplete.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/org-pcomplete.el')
-rw-r--r--lisp/org-pcomplete.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/org-pcomplete.el b/lisp/org-pcomplete.el
index 05683fe..42d0f9f 100644
--- a/lisp/org-pcomplete.el
+++ b/lisp/org-pcomplete.el
@@ -93,8 +93,10 @@ The return value is a string naming the thing at point."
(skip-chars-backward "[ \t\n]")
;; org-drawer-regexp matches a whole line but while
;; looking-back, we just ignore trailing whitespaces
- (or (org-looking-back (substring org-drawer-regexp 0 -1))
- (org-looking-back org-property-re))))
+ (or (org-looking-back (substring org-drawer-regexp 0 -1)
+ (line-beginning-position))
+ (org-looking-back org-property-re
+ (line-beginning-position)))))
(cons "prop" nil))
((and (equal (char-before beg1) ?:)
(not (equal (char-after (point-at-bol)) ?*)))