Remove redundant zoom hydra
It's already available with `text-scale-adjust`, so let's use this.
This commit is contained in:
parent
b3830b6868
commit
cef425b1f8
3
init.el
3
init.el
@ -476,7 +476,6 @@ split horizontally again, but this extra work should not matter much."
|
||||
db/dired-jump-to-bottom
|
||||
db/dired-get-size
|
||||
hydra-toggle/body
|
||||
hydra-zoom/body
|
||||
hydra-rectangle/body
|
||||
hydra-feature-shortcuts/body)
|
||||
:autoload (turn-on-flycheck-when-file
|
||||
@ -3114,7 +3113,7 @@ eventuelly be set to nil, however)."
|
||||
(bind-key "<f1>" #'db/run-or-hide-eshell)
|
||||
(bind-key "<f2>" #'hydra-feature-shortcuts/body)
|
||||
(bind-key "<f5>" #'project-find-regexp)
|
||||
(bind-key "<f6>" #'hydra-zoom/body)
|
||||
(bind-key "<f6>" #'text-scale-adjust)
|
||||
(bind-key "<f7>" #'dictcc)
|
||||
(bind-key "<f9>" #'hydra-org-linking/body)
|
||||
(bind-key "<f10>" #'magit-status)
|
||||
|
||||
@ -687,16 +687,6 @@ quite sure whether something like this exists already?"
|
||||
("q" toggle-debug-on-quit "debug-on-quit")
|
||||
("r" read-only-mode "read-only"))
|
||||
|
||||
(defhydra hydra-zoom (:color red
|
||||
:body-pre (require 'face-remap))
|
||||
;; the following newline is important, as otherwise the format string is not
|
||||
;; interpreted correctly; cf. https://oremacs.com/2015/02/23/hydra-0.11.0/
|
||||
"
|
||||
Zoom (%`text-scale-mode-amount): "
|
||||
("g" text-scale-increase "increase")
|
||||
("l" text-scale-decrease "decrease")
|
||||
("0" (text-scale-adjust 0) "reset"))
|
||||
|
||||
(defhydra hydra-rectangle (:body-pre (rectangle-mark-mode 1)
|
||||
:color pink
|
||||
:post (deactivate-mark))
|
||||
|
||||
Loading…
Reference in New Issue
Block a user