("image/gif" "display")
("image/bmp" "display")
("image/tiff" "display")
- ("application/postscript" "gv")
- ("application/pdf" "gv")))
+ ("application/postscript" "evince")
+ ("application/pdf" "evince")))
(setq vm-url-browser "firefox")
(primary-summary ((width . 81) (height . 33)))))
(setq vm-auto-folder-alist
- '(("delivered-to" ("root@" . "admin"))))
+ '(("delivered-to" ("root@" . "admin"))
+ ("from" ("Cron Daemon" . "admin"))))
(defun join-strings (del strings)
(with-output-to-string
(insert (format "To: %s\n" (join-strings ", " new))))))))))
(add-hook 'vm-reply-hook 'mdw-vm-fix-mailing-lists)
+
+(defun mdw-mark-as-spam ()
+ (interactive)
+ (save-window-excursion
+ (vm-pipe-message-to-command "userv spamd spam" 1))
+ (vm-delete-message 1))
+(define-key vm-summary-mode-map "/" 'mdw-mark-as-spam)