Remove keybinding logic from fonts.el

For two reasons:
1. I don't use these keybindings.
2. I'm trying to centralize all keybinding logic in keybindings.el.
This commit is contained in:
William Carroll 2020-08-31 12:02:35 +01:00
parent 453596adb2
commit 2c3dbe61b7

View file

@ -18,7 +18,6 @@
(require 'cycle) (require 'cycle)
(require 'device) (require 'device)
(require 'maybe) (require 'maybe)
(require 'general)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Constants ;; Constants
@ -34,9 +33,6 @@
('work-desktop "8")) ('work-desktop "8"))
"My preferred default font-size, which is device specific.") "My preferred default font-size, which is device specific.")
(defconst fonts/keybindings? t
"Install the keybindings when non-nil.")
(defconst fonts/size-step 10 (defconst fonts/size-step 10
"The amount (%) by which to increase or decrease a font.") "The amount (%) by which to increase or decrease a font.")
@ -137,17 +133,5 @@ The size of the font is determined by `fonts/size'."
(interactive) (interactive)
(fonts/whitelist-set (fonts/current))) (fonts/whitelist-set (fonts/current)))
(when fonts/keybindings?
(progn
(general-define-key
:prefix "<SPC>"
:states '(normal)
"Ff" #'fonts/next
"Pf" #'fonts/prev)
(general-define-key "s-9" #'fonts/ivy-select)
(general-define-key "s-0" #'fonts/reset-size)
(general-define-key "s-j" #'fonts/decrease-size)
(general-define-key "s-k" #'fonts/increase-size)))
(provide 'fonts) (provide 'fonts)
;;; fonts.el ends here ;;; fonts.el ends here