Fix incorrect titles due to buffer narrowing

2 files changed, 13 insertions, 0 deletions

diff --git a/seam-test.el b/seam-test.el
index b192045..0b7df1c 100644
--- a/seam-test.el
+++ b/seam-test.el
@@ -131,6 +131,18 @@
       (buffer-name note)
       (seam-get-title-from-buffer note)))))
 
+(ert-deftest seam-test-get-title-from-buffer-narrowed ()
+  (should
+   (equal
+    "foo"
+    (seam-test-with-notes ()
+        ((foo "foo"))
+      (with-current-buffer foo
+        (seam-test-add-contents foo "* My headline")
+        (forward-line)
+        (org-narrow-to-subtree)
+        (seam-get-title-from-buffer))))))
+
 (ert-deftest seam-test-get-title-from-file ()
   (seam-test-with-notes () ((note "Note"))
     (should
diff --git a/seam.el b/seam.el
index 564056c..e60027c 100644
--- a/seam.el
+++ b/seam.el
@@ -151,6 +151,7 @@ naming.  Must be a function taking two arguments: TITLE and TYPE."
   (with-current-buffer buffer
     (save-mark-and-excursion
       (save-restriction
+        (widen)
         (goto-char 1)
         (ignore-errors
           (re-search-forward (org-headline-re 1))