From 8fa5aa983a7be1be78d736223d733f1da1330ec2 Mon Sep 17 00:00:00 2001 From: Szymon Szukalski Date: Thu, 9 Apr 2026 11:37:31 +1000 Subject: Refine journal open shortcuts --- lisp/ss-org.el | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'lisp/ss-org.el') diff --git a/lisp/ss-org.el b/lisp/ss-org.el index 7df4d75..4bbd92d 100644 --- a/lisp/ss-org.el +++ b/lisp/ss-org.el @@ -17,9 +17,18 @@ (goto-char (point-max))) (when (fboundp 'ss-journal-goto-date) (if (ss-journal-goto-date) - (org-narrow-to-subtree) + (progn + (org-fold-show-entry) + (org-fold-show-subtree) + (org-narrow-to-subtree)) (goto-char (point-max))))) +(defun ss-open-journal-full () + "Open `ss-journal-file' with the full buffer visible." + (interactive) + (find-file (ss-require-existing-file ss-journal-file)) + (widen)) + (defun ss-open-moc () "Open the central MOC note." (interactive) -- cgit v1.2.3