;; https://oremacs.com/2017/03/18/dired-ediff/
(defun dired-ediff-files ()
(interactive)
- (require 'ediff)
+ (defvar ediff-after-quit-hook-internal)
(let ((files (dired-get-marked-files))
(wnd (current-window-configuration)))
(if (<= (length files) 2)
#+begin_src emacs-lisp
(use-package multiple-cursors
- :bind (("C-c M c" . mc/edit-lines)
- ("C-c M n" . mc/mark-next-like-this)
- ("C-c M p" . mc/mark-previous-like-this)
- ("C-c M a" . mc/mark-all-like-this)
- ("C-S-<mouse-1>" . mc/add-cursor-on-click)))
+ :bind
+ (("C-S-<mouse-1>" . mc/add-cursor-on-click)
+ (:prefix-map a/mc-prefix-map
+ :prefix "C-c m"
+ ("c" . mc/edit-lines)
+ ("n" . mc/mark-next-like-this)
+ ("p" . mc/mark-previous-like-this)
+ ("a" . mc/mark-all-like-this))))
#+end_src
* Email
read-mail-command 'gnus)
(use-package gnus
- :bind (("C-c m" . gnus)
- ("s-m" . gnus)
+ :bind (("s-m" . gnus)
("s-M" . gnus-unplugged))
:init
(setq