|
@@ -11629,7 +11629,7 @@ prefix argument (`C-u C-u C-u C-c C-w')."
|
|
(delete-region (point) (+ (point) (- region-end region-start)))
|
|
(delete-region (point) (+ (point) (- region-end region-start)))
|
|
(delete-region
|
|
(delete-region
|
|
(and (org-back-to-heading t) (point))
|
|
(and (org-back-to-heading t) (point))
|
|
- (min (buffer-size) (org-end-of-subtree t t) (point)))))
|
|
|
|
|
|
+ (min (1+ (buffer-size)) (org-end-of-subtree t t) (point)))))
|
|
(when (featurep 'org-inlinetask)
|
|
(when (featurep 'org-inlinetask)
|
|
(org-inlinetask-remove-END-maybe))
|
|
(org-inlinetask-remove-END-maybe))
|
|
(setq org-markers-to-move nil)
|
|
(setq org-markers-to-move nil)
|