FIX make new ID for each cloned headline
This commit is contained in:
parent
ca2d4d54f9
commit
04c177216c
|
@ -2082,8 +2082,6 @@ This includes unchecking all checkboxes, marking keywords as
|
|||
;; remove CLOSED planning entry
|
||||
(org-ml-headline-map-planning*
|
||||
(-some->> it (org-ml-planning-set-timestamp! :closed nil)))
|
||||
;; remove ID property
|
||||
(org-ml-headline-set-node-property "ID" (org-id-new))
|
||||
;; clear item checkboxes
|
||||
(org-ml-match-map* '(section :any * item)
|
||||
(org-ml-set-property :checkbox 'off it))
|
||||
|
@ -2139,7 +2137,8 @@ timestamp in the contents of the headline will be shifted."
|
|||
"Return HEADLINE repeated and shifted by OFFSET UNITs N times."
|
||||
(->> (org-ml-clone-node-n n headline)
|
||||
(--map-indexed (org-x--subtree-shift-timestamps
|
||||
(* offset (1+ it-index)) unit it))))
|
||||
(* offset (1+ it-index)) unit it))
|
||||
(--map (org-ml-headline-set-node-property "ID" (org-id-new) it))))
|
||||
|
||||
(defun org-x-clone-subtree-with-time-shift (n)
|
||||
"Like `org-clone-subtree-with-time-shift' except reset items and todos.
|
||||
|
|
Loading…
Reference in New Issue