Remove def-hydra! macro alias
Causes byte-compilation issues and the alias is unnecessary.
This commit is contained in:
parent
7c611df6a6
commit
0b48575c14
7 changed files with 13 additions and 16 deletions
|
@ -60,15 +60,11 @@ If any hook returns non-nil, all hooks after it are ignored.")
|
||||||
|
|
||||||
|
|
||||||
(def-package! hydra
|
(def-package! hydra
|
||||||
:commands (defhydra defhydradio)
|
:defer t
|
||||||
:init
|
|
||||||
;; In case I later need to wrap defhydra in any special functionality.
|
|
||||||
(defalias 'def-hydra! 'defhydra)
|
|
||||||
(defalias 'def-hydra-radio! 'defhydradio)
|
|
||||||
:config
|
:config
|
||||||
(setq lv-use-seperator t)
|
(setq lv-use-seperator t)
|
||||||
|
|
||||||
(def-hydra! doom@text-zoom (:hint t :color red)
|
(defhydra doom@text-zoom (:hint t :color red)
|
||||||
"
|
"
|
||||||
Text zoom: _j_:zoom in, _k_:zoom out, _0_:reset
|
Text zoom: _j_:zoom in, _k_:zoom out, _0_:reset
|
||||||
"
|
"
|
||||||
|
@ -76,7 +72,7 @@ If any hook returns non-nil, all hooks after it are ignored.")
|
||||||
("k" text-scale-decrease "out")
|
("k" text-scale-decrease "out")
|
||||||
("0" (text-scale-set 0) "reset"))
|
("0" (text-scale-set 0) "reset"))
|
||||||
|
|
||||||
(def-hydra! doom@window-nav (:hint nil)
|
(defhydra doom@window-nav (:hint nil)
|
||||||
"
|
"
|
||||||
Split: _v_ert _s_:horz
|
Split: _v_ert _s_:horz
|
||||||
Delete: _c_lose _o_nly
|
Delete: _c_lose _o_nly
|
||||||
|
|
|
@ -24,6 +24,7 @@ Expects a `font-spec'.")
|
||||||
return a string). This changes the 'long' name of a major-mode, allowing for
|
return a string). This changes the 'long' name of a major-mode, allowing for
|
||||||
shorter major mode name in the mode-line. See `doom|set-mode-name'.")
|
shorter major mode name in the mode-line. See `doom|set-mode-name'.")
|
||||||
|
|
||||||
|
;;
|
||||||
(defvar doom-init-ui-hook nil
|
(defvar doom-init-ui-hook nil
|
||||||
"List of hooks to run when the UI has been initialized.")
|
"List of hooks to run when the UI has been initialized.")
|
||||||
|
|
||||||
|
|
|
@ -141,7 +141,7 @@ immediately runs it on the current candidate (ending the ivy session)."
|
||||||
"C-o" #'+ivy@coo/body
|
"C-o" #'+ivy@coo/body
|
||||||
"M-o" #'ivy-dispatching-done-hydra)
|
"M-o" #'ivy-dispatching-done-hydra)
|
||||||
:config
|
:config
|
||||||
(def-hydra! +ivy@coo (:hint nil :color pink)
|
(defhydra +ivy@coo (:hint nil :color pink)
|
||||||
"
|
"
|
||||||
Move ^^^^^^^^^^ | Call ^^^^ | Cancel^^ | Options^^ | Action _w_/_s_/_a_: %s(ivy-action-name)
|
Move ^^^^^^^^^^ | Call ^^^^ | Cancel^^ | Options^^ | Action _w_/_s_/_a_: %s(ivy-action-name)
|
||||||
----------^^^^^^^^^^-+--------------^^^^-+-------^^-+--------^^-+---------------------------------
|
----------^^^^^^^^^^-+--------------^^^^-+-------^^-+--------^^-+---------------------------------
|
||||||
|
|
|
@ -33,7 +33,7 @@
|
||||||
(ignore (git-gutter))))
|
(ignore (git-gutter))))
|
||||||
(add-hook 'doom-escape-hook #'+version-control|update-git-gutter t))
|
(add-hook 'doom-escape-hook #'+version-control|update-git-gutter t))
|
||||||
|
|
||||||
(def-hydra! +version-control@git-gutter
|
(defhydra +version-control@git-gutter
|
||||||
(:body-pre (git-gutter-mode 1) :hint nil)
|
(:body-pre (git-gutter-mode 1) :hint nil)
|
||||||
"
|
"
|
||||||
╭─────────────────┐
|
╭─────────────────┐
|
||||||
|
|
|
@ -28,11 +28,11 @@
|
||||||
(defalias #'smerge-diff-upper-lower #'smerge-diff-mine-other)
|
(defalias #'smerge-diff-upper-lower #'smerge-diff-mine-other)
|
||||||
(defalias #'smerge-diff-base-lower #'smerge-diff-base-other)))
|
(defalias #'smerge-diff-base-lower #'smerge-diff-base-other)))
|
||||||
|
|
||||||
(def-hydra! +hydra-smerge (:hint nil
|
(defhydra +hydra-smerge (:hint nil
|
||||||
:pre (smerge-mode 1)
|
:pre (smerge-mode 1)
|
||||||
;; Disable `smerge-mode' when quitting hydra if
|
;; Disable `smerge-mode' when quitting hydra if
|
||||||
;; no merge conflicts remain.
|
;; no merge conflicts remain.
|
||||||
:post (smerge-auto-leave))
|
:post (smerge-auto-leave))
|
||||||
"
|
"
|
||||||
╭────────┐
|
╭────────┐
|
||||||
Movement Keep Diff Other │ smerge │
|
Movement Keep Diff Other │ smerge │
|
||||||
|
|
|
@ -45,7 +45,7 @@
|
||||||
;; Avy is required for showing links in the notebook list with ace-link.
|
;; Avy is required for showing links in the notebook list with ace-link.
|
||||||
(require 'avy)
|
(require 'avy)
|
||||||
;; add hydra
|
;; add hydra
|
||||||
(def-hydra! +ein/hydra (:hint t :color red)
|
(defhydra +ein/hydra (:hint t :color red)
|
||||||
"
|
"
|
||||||
Operations on Cells^^^^^^ Other
|
Operations on Cells^^^^^^ Other
|
||||||
----------------------------^^^^^^ ----------------------------------^^^^
|
----------------------------^^^^^^ ----------------------------------^^^^
|
||||||
|
|
|
@ -10,7 +10,7 @@
|
||||||
(def-package! kurecolor
|
(def-package! kurecolor
|
||||||
:after rainbow-mode
|
:after rainbow-mode
|
||||||
:config
|
:config
|
||||||
(def-hydra! +rgb@kurecolor (:color pink :hint nil)
|
(defhydra +rgb@kurecolor (:color pink :hint nil)
|
||||||
"
|
"
|
||||||
Inc/Dec _w_/_W_ brightness _d_/_D_ saturation _e_/_E_ hue "
|
Inc/Dec _w_/_W_ brightness _d_/_D_ saturation _e_/_E_ hue "
|
||||||
("w" kurecolor-decrease-brightness-by-step)
|
("w" kurecolor-decrease-brightness-by-step)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue