0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 19:07:52 +00:00

org-element: Tiny fix

* lisp/org-element.el (org-element-headline-parser): Do not assume
  property drawers are correctly formed.
This commit is contained in:
Nicolas Goaziou 2014-06-29 15:25:54 +02:00
parent 49f3c6e558
commit f12f9543fc

View file

@ -839,13 +839,13 @@ Assume point is at beginning of the headline."
(when end
(forward-line)
(while (< (point) end)
(looking-at org-property-re)
(setq plist
(plist-put
plist
(intern
(concat ":" (upcase (match-string 2))))
(org-match-string-no-properties 3)))
(when (looking-at org-property-re)
(setq plist
(plist-put
plist
(intern
(concat ":" (upcase (match-string 2))))
(org-match-string-no-properties 3))))
(forward-line)))))))
plist)))
(time-props