bashrc: Kill entitle, and remove some other bits of cruft.

[profile] / vm

diff --git a/vm b/vm
index 4f23c6b..6289279 100644 (file)
--- a/vm
+++ b/vm
@@ -5,8 +5,6 @@
 (setq vm-reply-subject-prefix "Re: ")
 (setq vm-included-text-prefix "> ")
 (setq vm-included-text-attribution-format "%F <%f> wrote:\n\n")
-;;(setq vm-spool-files '("/home/mdw/Mailbox"
-;;                    "imap:tux.nsict.org:143:inbox:login:mdw:*"))
 (setq vm-folder-directory "~/Mail/")
 (setq vm-startup-with-summary t)
 (setq vm-skip-deleted-messages nil)
@@ -31,32 +29,35 @@
 (setq vm-reply-ignored-addresses '("mdw@excessus\\.demon\\.co\\.uk"
                                   "mdw@nsict\\.org" "mdw@eh\\.org"
                                   "mdw@ncipher\\.com"
+                                  "mwooding@ncipher\\.com"
+                                  "submit@bugs\\.ncipher\\.com"
+                                  "mdw@chiark\\.greenend\\.org\\.uk"
                                   "mdw@distorted\\.org\\.uk"
                                   "mdw@metalzone\\.distorted\\.org\\.uk"
-                                  "mwooding@ncipher\\.com"
                                   "tux@nsict\\.org"))
 
 (defvar mdw-mailing-lists
   '("hibachi-dealers-members@chiark\\.greenend\\.org\\.uk"))
 
 (setq vm-mime-external-content-types-alist
-      '(("image/jpeg" "eog")
-       ("image/jpg" "eog")
-       ("image/gif" "eog")
-       ("image/tiff" "eog")))
+      '(("image/jpeg" "display")
+       ("image/jpg" "display")
+       ("image/gif" "display")
+       ("image/bmp" "display")
+       ("image/tiff" "display")
+       ("application/postscript" "gv")
+       ("application/pdf" "gv")))
 
-(setq vm-url-browser "galeon")
+(setq vm-url-browser "firefox")
 
 (setq vm-frame-parameter-alist
-      '((folder ((width . 80) (height . 33)))
-       (summary ((width . 80) (height . 33)))
-       (primary-summary ((width . 80) (height . 33)))
-        ))
+      '((folder ((width . 81) (height . 33)))
+       (summary ((width . 81) (height . 33)))
+       (primary-summary ((width . 81) (height . 33)))))
 
 (setq vm-auto-folder-alist
       '(("delivered-to" ("root@" . "admin"))))
 
-
 (defun join-strings (del strings)
   (with-output-to-string
     (if (null strings)
@@ -67,7 +68,7 @@
        (princ del)
        (princ (car strings))
        (setq strings (cdr strings))))))
-       
+
 (defun mdw-vm-fix-mailing-lists ()
   (save-restriction
     (save-excursion