From d14005fd187ccbaadc52d20272fc15bb9984ceca Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Tue, 21 Jun 2016 14:51:00 -0700 Subject: [PATCH] Add yanking hydra, rename font-resize hydra --- dotfiles/emacs.d/README.org | 20 ++++++++++++++++---- 1 file changed, 16 insertions(+), 4 deletions(-) diff --git a/dotfiles/emacs.d/README.org b/dotfiles/emacs.d/README.org index ac22ff94..89a2c7cf 100644 --- a/dotfiles/emacs.d/README.org +++ b/dotfiles/emacs.d/README.org @@ -1019,14 +1019,26 @@ Sets environment variables by starting a shell #+END_SRC *** hydra #+BEGIN_SRC emacs-lisp - (use-package hydra :commands defhydra) - -(defhydra hydra-font-resize - (global-map "C-M-=") + (use-package hydra + :demand t + :bind (("C-M-=" . imalison:hydra-font-resize/body) + ("C-c y" . imalison:hydra-yank/body)) + :config + (progn + (defhydra imalison:hydra-font-resize + nil "font-resize" ("-" imalison:font-size-decr "Decrease") ("=" imalison:font-size-incr "Increase") ("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 ** org *** main