                  (local-set-key "<" 'org-present-beginning)
                  (local-set-key "G" 'org-present-end)
                  (local-set-key ">" 'org-present-end)
-                 (define-key org-present-mode-keymap (kbd "gg")  'org-present-beginning)
-                 (define-key org-present-mode-keymap [backspace]      'org-present-prev)
-                 (define-key org-present-mode-keymap [?\S- ]  'org-present-prev)
-                 (define-key org-present-mode-keymap [up]      'org-present-prev)
-                 (define-key org-present-mode-keymap [down]      'org-present-next)
+                 (dolist (map  (list org-present-mode-map))
+                   (define-key map (kbd "gg")  'org-present-beginning)
+                   (define-key map [backspace]      'org-present-prev)
+                   (define-key map [?\S- ]  'org-present-prev)
+                   (define-key map [up]      'org-present-prev)
+                   (define-key map [down]      'org-present-next))
                  (org-present-read-only)))
      (add-hook 'org-present-mode-quit-hook
                (lambda ()

      scroll-step 1)

;; jump j/k always even in visual mode
(define-key evil-normal-state-map (kbd "j") 'evil-next-visual-line)
(define-key evil-normal-state-map (kbd "k") 'evil-previous-visual-line)
(define-key evil-normal-state-map (kbd "q") 'keyboard-quit)

(define-key evil-normal-state-map [escape] 'keyboard-quit)
(define-key evil-visual-state-map [escape] 'keyboard-quit)
(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] 'evil-exit-emacs-state)

(define-key evil-normal-state-map (kbd "C-k") (lambda () (interactive) (evil-scroll-up nil)))
;;(global-set-key (kbd "S-SPC") 'evil-scroll-page-up)
(global-set-key [?\S- ] 'evil-scroll-page-up)
(define-key evil-normal-state-map (kbd "C-j") (lambda () (interactive) (evil-scroll-down nil)))
(define-key evil-normal-state-map (kbd "C-d") 'save-buffer)
(define-key evil-normal-state-map (kbd "C-n") 'next-buffer)
(define-key evil-normal-state-map (kbd "C-p") 'previous-buffer)

;; Credit: [StackOverflow] in-emacs-flyspell-mode-how-to-add-new-word-to-dictionary
(defun save-this-word ()


(defun my-eww-settings ()
  "Enable vi-style keybindings."
  (dolist (map  (list eww-mode-map))
    (define-key map "h" 'previous-char)
    (define-key map "j" 'next-line)
    (define-key map "k" 'previous-line)
    (define-key map "l" 'next-char)
    (define-key map "n" 'eww-forward-url)
    (define-key map "p" 'eww-back-url)))
;; -- DANGER: avoid setting keys in evil-normal-map.
;;(define-key evil-normal-state-map "n" 'eww-forward-url)
;;(define-key evil-normal-state-map "p" 'eww-back-url))
