Add some consult funcs and refactor hydra nav

myconfig.org

@@ -323,13 +323,17 @@ This file:
 
   #+begin_src emacs-lisp
     (use-package consult
-      :bind
+      :bind (("C-c h" . consult-history)
-      ("C-c h" . consult-history)
+             ("C-c m" . consult-mode-command)
-      ("C-c m" . consult-mode-command)
+             ("C-c k" . consult-kmacro)
-      ("C-c k" . consult-kmacro)
+             ;; C-x bindings (ctl-x-map)
-      ;; C-x bindings (ctl-x-map)
+             ("C-s" . consult-line)                    ; orig. isearch-forward
-      ("C-x M-:" . consult-complex-command)     ;; orig. repeat-complex-command
+             ("C-c j" . consult-imenu)
-      ("C-x b" . consult-buffer)                ;; orig. switch-to-buffer
+             ("C-x M-:" . consult-complex-command)     ; orig. repeat-complex-command
+             ("C-x b" . consult-buffer)                ; orig. switch-to-buffer
+             :map minibuffer-local-map
+             ("C-r" . consult-history)
+             )
       )
   #+end_src
 
@@ -428,15 +432,16 @@ This file:
          (:pre (linum-mode 1)
                :post (linum-mode -1))
          "goto"
-         ("t" (lambda () (interactive)(move-to-window-line-top-bottom 0)) "top")
+         ("t" (lambda () (interactive)(move-to-window-line-top-bottom 0)) "top" :column "Window")
          ("b" (lambda () (interactive)(move-to-window-line-top-bottom -1)) "bottom")
          ("m" (lambda () (interactive)(move-to-window-line-top-bottom)) "middle")
-         ("s" (lambda () (interactive)(beginning-of-buffer)) "begin")
-         ("e" (lambda () (interactive)(end-of-buffer)) "end")
          ("c" recenter-top-bottom "recenter")
-         ("n" next-line "down")
+         ("s" (lambda () (interactive)(beginning-of-buffer)) "begin" :column "Buffer")
+         ("e" (lambda () (interactive)(end-of-buffer)) "end")
+         ("n" next-line "down" :column "Line")
          ("p" (lambda () (interactive) (forward-line -1))  "up")
-         ("g" goto-line "goto-line")
+         ("g" goto-line "consult-goto-line")
+         ("i" consult-imenu "cons-imenu" :column "Header")
          ("q" nil "quit")
          )
        )