diff --git a/init.org b/init.org
index 2883180..325258a 100644
--- a/init.org
+++ b/init.org
@@ -1357,6 +1357,7 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("N" contrapunctus-line-display-hydra/body "line display")
   ("o" save-buffer "save")
   ("Q" toggle-debug-on-quit "tdoq")
+  ("s" imenu-list "sidebar")
   ("T" cp-insert-timestamp "timestamp")
   ("u" find-file "new")
   ("U" launch-file "launch-file")
@@ -1391,6 +1392,7 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("N" contrapunctus-line-display-hydra/body "line display")
   ("o" save-buffer "save")
   ("Q" toggle-debug-on-quit "tdoq")
+  ("s" imenu-list "sidebar")
   ("T" cp-insert-timestamp "timestamp")
   ("u" find-file "new")
   ("U" launch-file "launch-file")
@@ -1465,6 +1467,8 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("C" contrapunctus-mc-hydra/body "multiple cursors")
   ("d" dired-jump "dired-jump")
   ("D" (cp-insert-timestamp t) "date")
+  ("E" toggle-debug-on-error "tdoe")
+  ("h" helpful-at-point "Help")
   ("G" contrapunctus-programming-hydra/body "up")
   ("i" (find-file "~/.emacs.d/init.org") "open init")
   ("I" contrapunctus-info-hydra/body "Info")
@@ -1472,9 +1476,11 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("m" magit-status "Magit")
   ("N" contrapunctus-line-display-hydra/body "line display")
   ("o" save-buffer "save")
+  ("Q" toggle-debug-on-quit "tdoq")
   ("s" imenu-list "sidebar")
   ("T" cp-insert-timestamp "timestamp")
   ("u" find-file "new")
+  ("U" launch-file "launch-file")
   ("v" find-alternate-file "revert")
   ("w" contrapunctus-window-hydra/body "window"))
 #+END_SRC
@@ -1508,15 +1514,28 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("e" cp-cl-eval/body "Eval")
   ("r" slime "REPL")
 
+  ("0" delete-window "delete this" :color red)
+  ("1" delete-other-windows "delete others" :color red)
+  ("2" split-window-below "split below" :color red)
+  ("3" split-window-right "split right" :color red)
   ("c" chronometrist "chronometrist")
-  ("D" dired-jump "dired-jump")
-  ("G" contrapunctus-programming-hydra/body "up")
+  ("C" contrapunctus-mc-hydra/body "multiple cursors")
+  ("d" dired-jump "dired-jump")
+  ("D" (cp-insert-timestamp t) "date")
+  ("E" toggle-debug-on-error "tdoe")
+  ("G" contrapunctus-general-hydra/body "up")
+  ("h" helpful-at-point "Help")
   ("i" (find-file "~/.emacs.d/init.org") "open init")
+  ("I" contrapunctus-info-hydra/body "Info")
   ("k" (kill-buffer (current-buffer)) "kill")
-  ("m" magit-status "Magit")
+  ("m" magit-status "magit")
   ("N" contrapunctus-line-display-hydra/body "line display")
   ("o" save-buffer "save")
+  ("Q" toggle-debug-on-quit "tdoq")
+  ("s" imenu-list "sidebar")
+  ("T" cp-insert-timestamp "timestamp")
   ("u" find-file "new")
+  ("U" launch-file "launch-file")
   ("v" find-alternate-file "revert")
   ("w" contrapunctus-window-hydra/body "window"))
 #+END_SRC
@@ -1547,16 +1566,30 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("e" cp-scm-eval/body "Eval")
   ("r" run-chicken "REPL")
 
-  ("i" (find-file "~/.emacs.d/init.org") "open init")
-  ("d" dired-jump "dired-jump")
-  ("u" find-file "new")
-  ("o" save-buffer "save")
-  ("k" (kill-buffer (current-buffer)) "kill")
-  ("N" contrapunctus-line-display-hydra/body "line display")
-  ("w" contrapunctus-window-hydra/body "window")
+  ("0" delete-window "delete this" :color red)
+  ("1" delete-other-windows "delete others" :color red)
+  ("2" split-window-below "split below" :color red)
+  ("3" split-window-right "split right" :color red)
   ("c" chronometrist "chronometrist")
-  ("m" magit-status "Magit")
-  ("G" contrapunctus-programming-hydra/body "up"))
+  ("C" contrapunctus-mc-hydra/body "multiple cursors")
+  ("d" dired-jump "dired-jump")
+  ("D" (cp-insert-timestamp t) "date")
+  ("E" toggle-debug-on-error "tdoe")
+  ("G" contrapunctus-general-hydra/body "up")
+  ("h" helpful-at-point "Help")
+  ("i" (find-file "~/.emacs.d/init.org") "open init")
+  ("I" contrapunctus-info-hydra/body "Info")
+  ("k" (kill-buffer (current-buffer)) "kill")
+  ("m" magit-status "magit")
+  ("N" contrapunctus-line-display-hydra/body "line display")
+  ("o" save-buffer "save")
+  ("Q" toggle-debug-on-quit "tdoq")
+  ("s" imenu-list "sidebar")
+  ("T" cp-insert-timestamp "timestamp")
+  ("u" find-file "new")
+  ("U" launch-file "launch-file")
+  ("v" find-alternate-file "revert")
+  ("w" contrapunctus-window-hydra/body "window"))
 #+END_SRC
 **** Guile
 #+BEGIN_SRC emacs-lisp
@@ -1565,16 +1598,30 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("e" cp-scm-eval/body "Eval")
   ("r" run-guile "REPL")
 
-  ("i" (find-file "~/.emacs.d/init.org") "open init")
-  ("d" dired-jump "dired-jump")
-  ("u" find-file "new")
-  ("o" save-buffer "save")
-  ("k" (kill-buffer (current-buffer)) "kill")
-  ("N" contrapunctus-line-display-hydra/body "line display")
-  ("w" contrapunctus-window-hydra/body "window")
+  ("0" delete-window "delete this" :color red)
+  ("1" delete-other-windows "delete others" :color red)
+  ("2" split-window-below "split below" :color red)
+  ("3" split-window-right "split right" :color red)
   ("c" chronometrist "chronometrist")
-  ("m" magit-status "Magit")
-  ("G" contrapunctus-programming-hydra/body "up"))
+  ("C" contrapunctus-mc-hydra/body "multiple cursors")
+  ("d" dired-jump "dired-jump")
+  ("D" (cp-insert-timestamp t) "date")
+  ("E" toggle-debug-on-error "tdoe")
+  ("G" contrapunctus-general-hydra/body "up")
+  ("h" helpful-at-point "Help")
+  ("i" (find-file "~/.emacs.d/init.org") "open init")
+  ("I" contrapunctus-info-hydra/body "Info")
+  ("k" (kill-buffer (current-buffer)) "kill")
+  ("m" magit-status "magit")
+  ("N" contrapunctus-line-display-hydra/body "line display")
+  ("o" save-buffer "save")
+  ("Q" toggle-debug-on-quit "tdoq")
+  ("s" imenu-list "sidebar")
+  ("T" cp-insert-timestamp "timestamp")
+  ("u" find-file "new")
+  ("U" launch-file "launch-file")
+  ("v" find-alternate-file "revert")
+  ("w" contrapunctus-window-hydra/body "window"))
 #+END_SRC
 *** Lilypond
 #+BEGIN_SRC emacs-lisp
@@ -1586,19 +1633,26 @@ _u_: next word       ^_l_: edit lines^      _s_: next whole symbol
   ("1" delete-other-windows "delete others" :color red)
   ("2" split-window-below "split below" :color red)
   ("3" split-window-right "split right" :color red)
+  ("c" chronometrist "chronometrist")
+  ("C" contrapunctus-mc-hydra/body "multiple cursors")
+  ("d" dired-jump "dired-jump")
+  ("D" (cp-insert-timestamp t) "date")
+  ("E" toggle-debug-on-error "tdoe")
+  ("G" contrapunctus-general-hydra/body "up")
+  ("h" helpful-at-point "Help")
   ("i" (find-file "~/.emacs.d/init.org") "open init")
   ("I" contrapunctus-info-hydra/body "Info")
-  ("d" dired-jump "dired-jump")
-  ("u" find-file "new")
-  ("o" save-buffer "save")
   ("k" (kill-buffer (current-buffer)) "kill")
+  ("m" magit-status "magit")
   ("N" contrapunctus-line-display-hydra/body "line display")
-  ("w" contrapunctus-window-hydra/body "window")
-  ("c" chronometrist "chronometrist")
-  ("m" magit-status "Magit")
-  ("E" toggle-debug-on-error "tdoe")
+  ("o" save-buffer "save")
   ("Q" toggle-debug-on-quit "tdoq")
-  ("G" contrapunctus-programming-hydra/body "up"))
+  ("s" imenu-list "sidebar")
+  ("T" cp-insert-timestamp "timestamp")
+  ("u" find-file "new")
+  ("U" launch-file "launch-file")
+  ("v" find-alternate-file "revert")
+  ("w" contrapunctus-window-hydra/body "window"))
 #+END_SRC
 *** Prolog
 #+BEGIN_SRC emacs-lisp