- starting init.el just basics (package, use-package, path-handlin) - include my-site-start.el that includes site-start.d directory and imports all *.el files in lexical order - functionality is imported via use-package inside the *.el file (first run: internet connection is needed to MELPA)
30 lines
756 B
EmacsLisp
30 lines
756 B
EmacsLisp
;;; 102-hydra.el --- tie related commands into a family of short bindings
|
|
|
|
;;; Commentary:
|
|
;; Hydra enables you to tie related commands into a family of short bindings
|
|
;; with a common prefix - a Hydra.
|
|
;; reference: https://github.com/abo-abo/hydra
|
|
|
|
;;; Code:
|
|
(use-package hydra
|
|
:config
|
|
(setq hydra-lv nil))
|
|
|
|
;; Zooming
|
|
(defhydra hydra-zoom ()
|
|
"zoom"
|
|
("+" text-scale-increase "in")
|
|
("=" text-scale-increase "in")
|
|
("-" text-scale-decrease "out")
|
|
("_" text-scale-decrease "out")
|
|
("0" (text-scale-adjust 0) "reset")
|
|
("q" nil "quit" :color blue))
|
|
|
|
(bind-keys ("C-x C-0" . hydra-zoom/body)
|
|
("C-x C-=" . hydra-zoom/body)
|
|
("C-x C--" . hydra-zoom/body)
|
|
("C-x C-+" . hydra-zoom/body))
|
|
|
|
(provide '102-hydra)
|
|
;;; 102-hydra.el ends here
|