[elpa] externals/logos 7f5010f3a0 10/25: Add Org/Outline reveal sample; update docs

[ELPA Syncer]

branch: externals/logos
commit 7f5010f3a0e53a4328bab1d27184a361c0071962
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Add Org/Outline reveal sample; update docs
---
 README.org | 28 +++++++++++++++++++++-------
 1 file changed, 21 insertions(+), 7 deletions(-)

diff --git a/README.org b/README.org
index 9c0c008de7..1b72b76bdd 100644
--- a/README.org
+++ b/README.org
@@ -205,21 +205,35 @@ changes out-of-the-box:
 (setq logos-scroll-lock nil)
 (setq logos-variable-pitch nil)
 
+(let ((map global-map))
+  (define-key map [remap narrow-to-region] #'logos-narrow-dwim)
+  (define-key map [remap forward-page] #'logos-forward-page-dwim)
+  (define-key map [remap backward-page] #'logos-backward-page-dwim)
+  (define-key map (kbd "<f9>") #'logos-focus-mode))
+
 ;; glue code for `logos-focus-mode' and `olivetti-mode'
-(defun prot/logos--olivetti-mode ()
+(defun my-logos--olivetti-mode ()
   "Toggle `olivetti-mode'."
   (if (or (bound-and-true-p olivetti-mode)
           (null (logos--focus-p)))
       (olivetti-mode -1)
     (olivetti-mode 1)))
 
-(add-hook 'logos-focus-mode-hook #'prot/logos--olivetti-mode)
+(add-hook 'logos-focus-mode-hook #'my-logos--olivetti-mode)
 
-(let ((map global-map))
-  (define-key map [remap narrow-to-region] #'logos-narrow-dwim)
-  (define-key map [remap forward-page] #'logos-forward-page-dwim)
-  (define-key map [remap backward-page] #'logos-backward-page-dwim)
-  (define-key map (kbd "<f9>") #'logos-focus-mode))
+;; glue code to expand an Org/Outline heading
+(defun my-logos--reveal ()
+  "Reveal Org or Outline entry."
+  (cond
+   ((and (eq major-mode 'org-mode)
+         (org-at-heading-p))
+    (org-show-entry)
+    (org-reveal t))
+   ((or (bound-and-true-p prot-outline-minor-mode)
+        (bound-and-true-p outline-minor-mode))
+    (outline-show-entry))))
+
+(add-hook 'logos-page-motion-hook #'my-logos--reveal)
 #+end_src
 
 * GNU Free Documentation License