(cons msg code)))
#+end_src
+*** Search for non-ASCII characters
+
+I’d like non-ASCII characters such as ‘’“”«»‹›áⓐ𝒶 to be selected when
+I search for their ASCII counterpart. Shoutout to [[http://endlessparentheses.com/new-in-emacs-25-1-easily-search-non-ascii-characters.html][endlessparentheses]]
+for this.
+
+#+begin_src emacs-lisp
+(setq search-default-mode #'char-fold-to-regexp)
+
+;; uncomment to extend this behaviour to query-replace
+;; (setq replace-char-fold t)
+#+end_src
+
** Bindings
#+begin_src emacs-lisp
(unbind-key "C-a" evil-insert-state-map)
(unbind-key "C-e" evil-insert-state-map)
(unbind-key "C-p" evil-insert-state-map)
- (unbind-key "C-n" evil-insert-state-map))
+ (unbind-key "C-n" evil-insert-state-map)
+ (unbind-key "C-k" evil-insert-state-map)
+ (bind-keys
+ :map evil-insert-state-map
+ ("C-k" . kill-line)
+ ("C-S-k" . evil-insert-digraph)
+ :map evil-motion-state-map
+ ([down-mouse-1] . nil)))
#+end_src
#+begin_src emacs-lisp
(setq
magit-repository-directories '(("~/.emacs.d/" . 0)
("~/src/git/" . 1)))
- (push (cons [unpushed status] 'show) magit-section-initial-visibility-alist)
+ (nconc magit-section-initial-visibility-alist
+ '(([unpulled status] . show)
+ ([unpushed status] . show)))
:custom-face (magit-diff-file-heading ((t (:weight normal)))))
#+end_src