emacs - make Y behave correctly

This commit is contained in:
Valentin Gehrke 2017-11-02 14:57:11 +01:00
parent aa1454c390
commit cf298bbb3f

View file

@ -306,6 +306,10 @@
(swiper (format "\\<%s\\>" (swiper (format "\\<%s\\>"
(thing-at-point thing)))) (thing-at-point thing))))
(defun my/evil-yank-till-eol ()
(interactive)
(evil-yank-characters (point) (point-at-eol)))
(use-package evil (use-package evil
:ensure t :ensure t
:demand t :demand t
@ -320,6 +324,7 @@
(my/kill-window-or-buffer))) (my/kill-window-or-buffer)))
(define-key evil-normal-state-map "gb" 'my/evil-go-back) (define-key evil-normal-state-map "gb" 'my/evil-go-back)
(define-key evil-normal-state-map "gn" 'my/evil-go-forward) (define-key evil-normal-state-map "gn" 'my/evil-go-forward)
(define-key evil-normal-state-map "Y" 'my/evil-yank-till-eol)
(define-key evil-motion-state-map [down-mouse-1] 'silence) (define-key evil-motion-state-map [down-mouse-1] 'silence)
(define-key evil-motion-state-map [mouse-1] 'silence) (define-key evil-motion-state-map [mouse-1] 'silence)
(define-key evil-insert-state-map (kbd "<up>") 'nope) (define-key evil-insert-state-map (kbd "<up>") 'nope)