'(("image/jpeg" "display")
("image/jpg" "display")
("image/gif" "display")
+ ("image/bmp" "display")
("image/tiff" "display")
("application/postscript" "gv")
("application/pdf" "gv")))
(setq vm-frame-parameter-alist
'((folder ((width . 81) (height . 33)))
(summary ((width . 81) (height . 33)))
- (primary-summary ((width . 81) (height . 33)))
- ))
+ (primary-summary ((width . 81) (height . 33)))))
(setq vm-auto-folder-alist
'(("delivered-to" ("root@" . "admin"))))
(princ del)
(princ (car strings))
(setq strings (cdr strings))))))
-
+
(defun mdw-vm-fix-mailing-lists ()
(save-restriction
(save-excursion