Fix multiple property drawers insertion with repeated tasks

* lisp/org.el (org-add-log-setup): A property drawer may be inserted
  where the note is going to be added.  Make sure the note ends after
  the drawer.

Reported-by: Bradley M. Kuhn <bkuhn@ebb.org>
<http://permalink.gmane.org/gmane.emacs.orgmode/93199>
This commit is contained in:
Nicolas Goaziou 2014-12-08 00:31:50 +01:00
parent 16ebbe49e4
commit 8985b3de64
1 changed files with 3 additions and 0 deletions

View File

@ -13652,6 +13652,9 @@ EXTRA is additional text that will be inserted into the notes buffer."
(skip-chars-backward " \t\n\r")
(forward-line)))
(move-marker org-log-note-marker (point))
;; Preserve position even if a property drawer is inserted in the
;; process.
(set-marker-insertion-type org-log-note-marker t)
(setq org-log-note-purpose purpose
org-log-note-state state
org-log-note-previous-state prev-state