bicycle and outlines

2 files changed, 22 insertions, 2 deletions

diff --git a/completion.org b/completion.org
index ee87ed4..afb4ef6 100644
--- a/completion.org
+++ b/completion.org
@@ -447,7 +447,7 @@
       :init (setq org-imenu-depth 7)
       :config
       (defun jao-imenu-hook ()
-        (when (derived-mode-p 'org-mode)
-          (org-reveal t)))
+        (cond ((derived-mode-p 'org-mode) (org-reveal t))
+              (outline-minor-mode (outline-show-entry))))
       (add-hook 'imenu-after-jump-hook #'jao-imenu-hook))
   #+end_src
diff --git a/init.org b/init.org
index 0e3db42..4d98134 100644
--- a/init.org
+++ b/init.org
@@ -2113,6 +2113,26 @@
         :init (add-hook 'prog-mode-hook #'smartscan-mode)
         :diminish)
     #+end_src
+*** Outlines
+    #+begin_src emacs-lisp
+      ;; (use-package outline
+      ;;   :config
+      ;;   (defun jao-outline-setup () (hide-sublevels 1))
+      ;;   (add-hook 'outline-minor-mode-hook #'jao-outline-setup))
+
+      (use-package bicycle
+        :ensure t
+        :after outline
+        :bind (:map outline-minor-mode-map
+                    ("C-<tab>" . bicycle-cycle)
+                    ("S-<tab>" . bicycle-cycle-global)))
+
+      (use-package prog-mode
+        :config
+        (add-hook 'prog-mode-hook 'outline-minor-mode)
+        (add-hook 'prog-mode-hook 'hs-minor-mode))
+
+    #+end_src
 *** Paredit and parens
     #+begin_src emacs-lisp
       (require 'paren)