aboutsummaryrefslogtreecommitdiff
path: root/tests/test-pearl-todo-keywords.el
diff options
context:
space:
mode:
authorCraig Jennings <c@cjennings.net>2026-06-03 07:07:52 -0500
committerCraig Jennings <c@cjennings.net>2026-06-03 07:07:52 -0500
commit6ef196e306320804b80a502dab29dbafd12285bc (patch)
treebcd067d1b7bc629ca049ba6c7a42cc87b57e8e0b /tests/test-pearl-todo-keywords.el
parentf4cf700efd8bb44ca50f555e2ee04596fc690b91 (diff)
downloadpearl-6ef196e306320804b80a502dab29dbafd12285bc.tar.gz
pearl-6ef196e306320804b80a502dab29dbafd12285bc.zip
feat(render): open a fetched view folded to the issue headings
The header set #+STARTUP: show3levels, which opened a fresh view with each issue's Comments heading already unfolded. That's a level of detail past what you want when scanning a list. Drop to show2levels so a view opens at the parent plus the issue headings, with comments and bodies folded under each issue. pearl--restore-page-visibility re-reads #+STARTUP from the buffer after a repopulation, so the in-place rebuild path follows the new depth without any other change.
Diffstat (limited to 'tests/test-pearl-todo-keywords.el')
-rw-r--r--tests/test-pearl-todo-keywords.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/test-pearl-todo-keywords.el b/tests/test-pearl-todo-keywords.el
index 0555a4e..e8250dc 100644
--- a/tests/test-pearl-todo-keywords.el
+++ b/tests/test-pearl-todo-keywords.el
@@ -127,7 +127,7 @@
"The header rebuild scans the final buffer so every visible heading is declared."
(let ((org-todo-keywords '((sequence "TODO" "IN-PROGRESS" "|" "DONE"))))
(with-temp-buffer
- (insert "#+STARTUP: show3levels\n#+TODO: TODO | DONE\n\n"
+ (insert "#+STARTUP: show2levels\n#+TODO: TODO | DONE\n\n"
"* View\n"
"** IN-PROGRESS Issue A\n:PROPERTIES:\n:LINEAR-ID: a\n:LINEAR-STATE-TYPE: started\n:END:\n"
"** DONE Issue B\n:PROPERTIES:\n:LINEAR-ID: b\n:LINEAR-STATE-TYPE: completed\n:END:\n")
@@ -141,7 +141,7 @@
"A retained heading with no STATE-TYPE drawer is classified by org-done-keywords."
(let ((org-todo-keywords '((sequence "TODO" "|" "SHIPPED"))))
(with-temp-buffer
- (insert "#+STARTUP: show3levels\n#+TODO: TODO | SHIPPED\n\n"
+ (insert "#+STARTUP: show2levels\n#+TODO: TODO | SHIPPED\n\n"
"* View\n"
"** SHIPPED Old Issue\n:PROPERTIES:\n:LINEAR-ID: a\n:END:\n") ; no STATE-TYPE
(org-mode)