(provide 'cce/hydra-help)
(use-package which-key
:diminish
:config
(which-key-mode))
(defhydra hydra-help (:columns 4)
("v" describe-variable "Desc Variable")
("w" embark-bindings "Desc Bindings")
("s" describe-syntax "Desc Syntax")
("P" describe-package "Desc Package")
("o" describe-symbol "Desc Symbols")
("m" describe-mode "Desc Mode")
("k" describe-key "Desc Keys")
("f" describe-function "Desc Functions")
("d" apropos-documentation "Apropos Docs")
("a" apropos-command "Apropos Commands")
("j" cce/man-at-point "Man for symbol at point.")
("r" info-emacs-manual "Emacs Info Pages")
("p" finder-by-keyword "Find Package by Keyword")
("l" view-lossage "Recent Commands")
("i" info "Info Index")
("e" view-echo-area-messages "*Messages*")
("b" describe-bindings "List Bindings")
("S" info-lookup-symbol "Lookup Symbol in Info")
("q" nil))
(bind-keys ("C-h w" . embark-bindings)
("C-h <SPC>" . hydra-help/body))
(with-eval-after-load 'evil-leader
(evil-leader/set-key "h" 'hydra-help/body))