diff options
| -rw-r--r-- | .emacs.d/rul-lisp/packages/rul-bindings.el | 38 |
1 files changed, 3 insertions, 35 deletions
diff --git a/.emacs.d/rul-lisp/packages/rul-bindings.el b/.emacs.d/rul-lisp/packages/rul-bindings.el index 3a608c0..0ae80f3 100644 --- a/.emacs.d/rul-lisp/packages/rul-bindings.el +++ b/.emacs.d/rul-lisp/packages/rul-bindings.el @@ -9,41 +9,9 @@ (global-set-key (kbd "C--") #'help/insert-em-dash) -(use-package hydra - :ensure t - :defer 1) - -;; tab-bar -(defhydra hydra-tab-bar (:color amaranth) - "Tab Bar Operations" - ("t" tab-new "Create a new tab" :column "Creation" :exit t) - ("d" dired-other-tab "Open Dired in another tab") - ("f" find-file-other-tab "Find file in another tab") - ("x" tab-close "Close current tab") - ("m" tab-move "Move current tab" :column "Management") - ("r" tab-rename "Rename Tab") - ("<return>" tab-bar-select-tab-by-name "Select tab by name" :column "Navigation") - ("l" tab-next "Next Tab") - ("j" tab-previous "Previous Tab") - ("q" nil "Exit" :exit t)) - -(global-set-key (kbd "C-x t") 'hydra-tab-bar/body) - -;; Zoom -(defhydra hydra-zoom () - "zoom" - ("g" text-scale-increase "in") - ("l" text-scale-decrease "out")) - -(global-set-key (kbd "C-c z") 'hydra-zoom/body) - -;; Go -(defhydra hydra-go () - "zoom" - ("=" gofmt :exit t) - ("c" go-coverage :exit t)) - -(global-set-key (kbd "C-c m") 'hydra-go/body) +;; Zoom. `text-scale-adjust' keeps reading +, -, and 0 after being +;; invoked, so it repeats like a hydra without needing one. +(global-set-key (kbd "C-c z") #'text-scale-adjust) (use-package which-key :ensure t |