Add key bindings for zone

2016-10-25 19:05:54 +02:00
parent 60d807cc33
commit 15d81e221b
1 changed files with 11 additions and 2 deletions
--- a/init.el
+++ b/init.el
@@ -287,10 +287,19 @@
  (setq zone-programs [zone-nyan])
  (setq-default zone-nyan-hide-progress t))

-(use-package zone
-  :config
+(defun gpolonkai/zone-enable ()
+  (interactive)
  (zone-when-idle 60))

+(use-package zone
+  :demand
+  :config
+  (zone-when-idle 60)
+  :bind
+  (:map gpolonkai/pers-map
+   ("zi" . gpolonkai/zone-enable)
+   ("zq" . zone-leave-me-alone)))
+
 ;; Magit and friends
 (use-package magit
  :ensure t