Add yanking hydra, rename font-resize hydra

This commit is contained in:
Ivan Malison 2016-06-21 14:51:00 -07:00
parent 2507aee550
commit d14005fd18

View File

@ -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