(require 'smartrep) (smartrep-define-key global-map "" '(("g" . text-scale-increase) ("l" . text-scale-decrease))) (smartrep-define-key global-map "" '(("+" . text-scale-increase) ("-" . text-scale-decrease))) ;;; まだhydraではできない… ;; (hydra-create "" ;; '(("g" text-scale-increase "zoom in") ;; ("l" text-scale-decrease "zoom out"))) ;; (hydra-create "" ;; '(("+" text-scale-increase "zoom in") ;; ("-" text-scale-decrease "zoom out")))