diff --git a/lisp/mitch-keybinds.el b/lisp/mitch-keybinds.el index 342a817..b5697fe 100644 --- a/lisp/mitch-keybinds.el +++ b/lisp/mitch-keybinds.el @@ -20,11 +20,6 @@ "" 'keyboard-escape-quit "C--" 'text-scale-decrease "C-=" 'text-scale-increase) -;; evil visual line mode, not sure why re-implemented -(general-define-key - :states 'motion - "j" 'evil-next-visual-line - "k" 'evil-previous-visual-line) ;; we are not spacemacs, but we might be (general-define-key :states '(normal visual) diff --git a/lisp/mitch-packages.el b/lisp/mitch-packages.el index a4f3ac5..2fc1ca6 100644 --- a/lisp/mitch-packages.el +++ b/lisp/mitch-packages.el @@ -69,11 +69,16 @@ ;; load evil (use-package evil :general + ;; Visual lines. Redefined for auto-scrolling madness. (general-define-key :states 'normal "" 'evil-beginning-of-line - "C-p" 'scroll-down-line - "C-n" 'scroll-up-line) + "j" (general-key-dispatch 'evil-next-visual-line + :timeout 0.025 + "j" 'scroll-up-line) + "k" (general-key-dispatch 'evil-previous-visual-line + :timeout 0.025 + "k" 'scroll-down-line)) (general-define-key :states 'insert "C-w" 'evil-window-map