dot/emacs: Make `gnus' be the default mail reader.

[profile] / dot / emacs

diff --git a/dot/emacs b/dot/emacs
index 660a7ee..ef0feac 100644 (file)
--- a/dot/emacs
+++ b/dot/emacs
@@ -124,7 +124,8 @@
 
 (setq sendmail-program "~/bin/sendmail-hack")
 
-(setq mail-user-agent 'message-user-agent)
+(setq mail-user-agent 'message-user-agent
+      read-mail-command 'gnus)
 (setq message-signature-separator "^-- \\(\\|\\[mdw\\]\\)$"
       message-yank-prefix "> "
       message-yank-cited-prefix "> "
@@ -191,6 +192,7 @@
 (setq enable-local-variables :safe
       enable-local-eval nil)
 (setq dabbrev-case-replace nil)                ;Retain case when completing
+(setq linum-format "%7d ")
 (setq next-line-add-newlines nil)      ;Don't add weird newlines
 (setq split-height-threshold 45)       ;Reuse windows where sensible
 (setq display-buffer-reuse-frames nil  ;Don't confuse me by showing buffers
@@ -445,6 +447,10 @@
          #'(lambda () (mdw-clobber-evil-keymap org-mode-map)))
 (add-hook 'org-agenda-mode-hook
          #'(lambda () (mdw-clobber-evil-keymap org-agenda-mode-map)))
+(or mdw-fast-startup
+    (progn
+      (org-remember-insinuate)
+      (global-set-key [?\C-c ?r] 'org-remember)))
 
 ;; Recognising types of files.
 
@@ -517,7 +523,7 @@
 
 (eval-after-load "tramp"
   '(let ((fix-args (if (mdw-version-< tramp-version "2.1")
-                      #'append #'identity)))
+                      #'append #'list)))
      (setq tramp-methods
           (mdw-uniquify-alist
            `(("become"