Add yanking hydra, rename font-resize hydra
This commit is contained in:
parent
2507aee550
commit
d14005fd18
@ -1019,14 +1019,26 @@ Sets environment variables by starting a shell
|
|||||||
#+END_SRC
|
#+END_SRC
|
||||||
*** hydra
|
*** hydra
|
||||||
#+BEGIN_SRC emacs-lisp
|
#+BEGIN_SRC emacs-lisp
|
||||||
(use-package hydra :commands defhydra)
|
(use-package hydra
|
||||||
|
:demand t
|
||||||
(defhydra hydra-font-resize
|
:bind (("C-M-=" . imalison:hydra-font-resize/body)
|
||||||
(global-map "C-M-=")
|
("C-c y" . imalison:hydra-yank/body))
|
||||||
|
:config
|
||||||
|
(progn
|
||||||
|
(defhydra imalison:hydra-font-resize
|
||||||
|
nil
|
||||||
"font-resize"
|
"font-resize"
|
||||||
("-" imalison:font-size-decr "Decrease")
|
("-" imalison:font-size-decr "Decrease")
|
||||||
("=" imalison:font-size-incr "Increase")
|
("=" imalison:font-size-incr "Increase")
|
||||||
("0" imalison:font-size-reset "Reset to default size"))
|
("0" imalison:font-size-reset "Reset to default size"))
|
||||||
|
|
||||||
|
(defhydra imalison:hydra-yank
|
||||||
|
nil
|
||||||
|
"Yank text"
|
||||||
|
("p" imalison:copy-buffer-file-path "Projectile path")
|
||||||
|
("f" imalison:copy-buffer-file-path-full "Full path")
|
||||||
|
("n" imalison:copy-buffer-file-name "File name")
|
||||||
|
("b" imalison:copy-current-git-branch "Git Branch"))))
|
||||||
#+END_SRC
|
#+END_SRC
|
||||||
** org
|
** org
|
||||||
*** main
|
*** main
|
||||||
|
Loading…
Reference in New Issue
Block a user