 
 ;; Settings:
 (custom-set-variables
+ '(evil-want-abbrev-expand-on-insert-exit nil)
  '(evil-shift-width 2)
  '(evil-move-beyond-eol t)
  '(evil-want-fine-undo nil)

 '(evil-fringe-mark-show-special t)
 '(evil-fringe-mark-ignore-chars '(?' ?{ ?} ?^ ?.))
 '(evil-owl-display-method 'window)
 '(evil-owl-max-string-length 60))

;; Baffles me why I need to do this:
(customize-set-variable 'evil-want-Y-yank-to-eol t)

(custom-set-faces

    (apply oldfun args)))
(advice-add #'evil-ex-start-word-search :around #'pjones:evil-search-word)

(defun pjones:evil-set-cursor ()
  "Called from `evil-mode' to set the cursor."
  (let ((face (intern (format "doom-modeline-evil-%s-state" evil-state))))
    (when (facep face)
      (evil-set-cursor-color
      (face-attribute face :foreground nil t)))))

;; Remove search highlighting after using C-l:
(advice-add #'recenter-top-bottom :after '(lambda (&rest _args) (evil-ex-nohighlight)))
