Add key bindings for zone

6 years ago · 15d81e221b
1 changed files with 10 additions and 1 deletions
--- a/init.el
+++ b/init.el
@ -287,9 +287,18 @@
  (setq zone-programs [zone-nyan])
  (setq-default zone-nyan-hide-progress t))

+(defun gpolonkai/zone-enable ()
+  (interactive)
+  (zone-when-idle 60))
+
 (use-package zone
+  :demand
  :config
-  (zone-when-idle 60))
+  (zone-when-idle 60)
+  :bind
+  (:map gpolonkai/pers-map
+   ("zi" . gpolonkai/zone-enable)
+   ("zq" . zone-leave-me-alone)))

 ;; Magit and friends
 (use-package magit