|
@@ -6173,7 +6173,6 @@ useful if the caller implements cut-and-paste as copy-then-paste-then-cut."
|
|
(setq end (point))
|
|
(setq end (point))
|
|
(goto-char beg0)
|
|
(goto-char beg0)
|
|
(when (> end beg)
|
|
(when (> end beg)
|
|
- (debug)
|
|
|
|
(setq org-subtree-clip-folded folded)
|
|
(setq org-subtree-clip-folded folded)
|
|
(when (or cut force-store-markers)
|
|
(when (or cut force-store-markers)
|
|
(org-save-markers-in-region beg end))
|
|
(org-save-markers-in-region beg end))
|