|
@@ -1171,7 +1171,10 @@ may have been stored before."
|
|
|
(goto-char (point-min))
|
|
|
(unless (org-at-heading-p) (outline-next-heading)))
|
|
|
;; Otherwise, insert as a top-level entry at the end of the file.
|
|
|
- (t (goto-char (point-max))))
|
|
|
+ (t (goto-char (point-max))
|
|
|
+ ;; Make sure that last point is not folded.
|
|
|
+ (org-fold-core-cycle-over-indirect-buffers
|
|
|
+ (org-fold-region (max 1 (1- (point-max))) (point-max) nil))))
|
|
|
(let ((origin (point)))
|
|
|
(unless (bolp) (insert "\n"))
|
|
|
(org-capture-empty-lines-before)
|