feat[work]: improve presentation header opening

SwarselSystems.org

@@ -34038,7 +34038,9 @@ When holding presentations, I think it is important to not have too many distrac
       (if (and target (< target (point-max)))
           (progn
             (goto-char target)
-              (org-fold-show-entry))
+            (org-fold-show-entry)
+            (unless (pos-visible-in-window-p (point-max))
+              (recenter 0)))
         (org-present-next))))
 
 #+end_src

files/emacs/init.el

@@ -1245,7 +1245,9 @@ create a new one."
     (if (and target (< target (point-max)))
         (progn
           (goto-char target)
-          (org-fold-show-entry))
+          (org-fold-show-entry)
+          (unless (pos-visible-in-window-p (point-max))
+            (recenter 0)))
       (org-present-next))))
 
 (defun org-babel-execute:markdown (body params)