Don't narrow subtree before first heading.

rudolfochrist · Nov 20, 2016 · b6618d7 · b6618d7
1 parent e5fd369
commit b6618d7
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/interleave.el b/interleave.el
@@ -280,8 +280,9 @@ function does nothing.
 
 When FORCE is non-nil `interleave-disable-narrowing' is
 ignored."
-  (when (or (not interleave-disable-narrowing)
-            force)
+  (when (and (not (org-before-first-heading-p))
+             (or (not interleave-disable-narrowing)
+                 force))
     (org-narrow-to-subtree)))
 
 (defun interleave--go-to-page-note (page)