 (setq doom-localleader-key ",")
 
 ;; Move betweeen windows faster
-(map! :map global-map
-      "C-h" #'evil-window-left
-      "C-j" #'evil-window-down
-      "C-k" #'evil-window-up
-      "C-l" #'evil-window-right)
+(map! (:g
+       "C-h" #'evil-window-left
+       "C-j" #'evil-window-down
+       "C-k" #'evil-window-up
+       "C-l" #'evil-window-right))
 
 ;; Highlight lines longer than 80 chars
 (setq whitespace-line-column 80

(setq which-key-idle-delay 0.1)

;; Undo-tree
(setq undo-tree-auto-save-history t)
(setq undo-tree-history-directory-alist '(("." . "~/.emacs.d/undo")))

;; Make ESC to work as expected in minibuffers
(define-key minibuffer-local-map [escape] #'minibuffer-keyboard-quit)
(define-key minibuffer-local-ns-map [escape] #'minibuffer-keyboard-quit)
(define-key minibuffer-local-completion-map [escape] #'minibuffer-keyboard-quit)
(define-key minibuffer-local-must-match-map [escape] #'minibuffer-keyboard-quit)
(define-key minibuffer-local-isearch-map [escape] #'minibuffer-keyboard-quit)
(global-set-key [escape] #'keyboard-quit)

;;; AFTER MODULE


     additional-wrap
     commentary
     (escape insert emacs)
     (operators normal)
     prettify
     slurp/barf-cp)))

;; Zoom-frm
(def-package! zoom-frm
  :config
  (map! (:g
         "C-=" #'zoom-frm-in
         "C--" #'zoom-frm-out
         "C-0" #'zoom-frm-unzoom))
  (global-set-key (vector (list #'control mouse-wheel-down-event)) #'zoom-frm-in)
  (global-set-key (vector (list #'control mouse-wheel-up-event)) #'zoom-frm-out))

