Merge pull request #2 from Whil-/master

Set visibility of backlinks section

1 files changed, 10 insertions, 6 deletions

diff --git a/nroam.el b/nroam.el
index e7cf780..7c3f379 100644
--- a/nroam.el
+++ b/nroam.el
@@ -185,12 +185,16 @@ Make the region inserted by BODY read-only, and marked with
 
 (defun nroam--insert ()
   "Insert nroam sections in the current buffer."
-  (with-buffer-modified-unmodified
-   (save-excursion
-     (goto-char (point-max))
-     (with-nroam-markers
-       (seq-do #'funcall nroam-sections)))
-   (nroam--hide-drawers)))
+  (let ((p (point-max)))
+    (with-buffer-modified-unmodified
+     (save-excursion
+       (goto-char p)
+       (with-nroam-markers
+         (seq-do #'funcall nroam-sections))
+       (when (nroam--sections-inserted-p)
+         (save-restriction
+           (narrow-to-region p (point-max))
+           (org-set-startup-visibility)))))))
 
 (defun nroam--get-backlinks ()
   "Return a list of backlinks for the current buffer."