Add missing `save-restriction' to template copy function
This commit is contained in:
parent
fba18ca527
commit
a404f9a8c2
|
@ -414,7 +414,8 @@ headline of the periodic task, i.e., of the parent of the current
|
|||
item at point. The body of the template item, without any
|
||||
drawers, will be copied to point."
|
||||
(interactive)
|
||||
(let ((template (save-mark-and-excursion
|
||||
(let ((template (save-restriction
|
||||
(save-mark-and-excursion
|
||||
(let ((template-element (progn
|
||||
(outline-up-heading 1 'invisible-ok)
|
||||
(outline-next-heading)
|
||||
|
@ -429,7 +430,7 @@ drawers, will be copied to point."
|
|||
(goto-char (org-element-property :contents-end template-element))
|
||||
(org-mark-element)
|
||||
(buffer-substring-no-properties (region-beginning)
|
||||
(region-end))))))
|
||||
(region-end)))))))
|
||||
(insert template)
|
||||
(org-update-statistics-cookies nil)))
|
||||
|
||||
|
|
Loading…
Reference in New Issue