From: Mark Wooding Date: Sun, 18 Jun 2006 09:22:49 +0000 (+0100) Subject: vm: Reformatting cleanups. X-Git-Url: https://git.distorted.org.uk/~mdw/profile/commitdiff_plain/6b3f86c6b6be29c634c1d4b7b1461c539bcc6df3?ds=inline vm: Reformatting cleanups. Remove a pile of pointless SETQ verbiage. --- diff --git a/vm b/vm index 6289279..d3824cc 100644 --- a/vm +++ b/vm @@ -2,30 +2,33 @@ ;;; ;;; Configuration for VM -(setq vm-reply-subject-prefix "Re: ") -(setq vm-included-text-prefix "> ") -(setq vm-included-text-attribution-format "%F <%f> wrote:\n\n") -(setq vm-folder-directory "~/Mail/") -(setq vm-startup-with-summary t) -(setq vm-skip-deleted-messages nil) -(setq vm-circular-folders nil) -(setq vm-preview-lines nil) -(setq vm-highlighted-header-regexp "^From\\|^Subject") -(setq vm-delete-after-saving t) -(setq vm-move-after-deleting t) -(setq vm-delete-empty-folders) -(setq vm-mime-qp-encoder-program "mimencode") -(setq vm-mime-qp-encoder-switches '("-q")) -(setq vm-mime-qp-decoder-program "mimencode") -(setq vm-mime-qp-decoder-switches '("-q" "-u")) -(setq vm-mime-base64-encoder-program "mimencode") -(setq vm-mime-base64-encoder-switches '("-b")) -(setq vm-mime-base64-decoder-program "mimencode") -(setq vm-mime-base64-decoder-switches '("-b" "-u")) +(setq vm-reply-subject-prefix "Re: " + vm-included-text-prefix "> " + vm-included-text-attribution-format "%F <%f> wrote:\n\n" + vm-folder-directory "~/Mail/" + vm-startup-with-summary t + vm-skip-deleted-messages nil + vm-circular-folders nil + vm-preview-lines nil + vm-highlighted-header-regexp "^From\\|^Subject" + vm-delete-after-saving t + vm-move-after-deleting t + vm-delete-empty-folders) + +(setq vm-mime-qp-encoder-program "mimencode" + vm-mime-qp-encoder-switches '("-q") + vm-mime-qp-decoder-program "mimencode" + vm-mime-qp-decoder-switches '("-q" "-u") + vm-mime-base64-encoder-program "mimencode" + vm-mime-base64-encoder-switches '("-b") + vm-mime-base64-decoder-program "mimencode" + vm-mime-base64-decoder-switches '("-b" "-u")) + (setq vm-visible-headers '("resent-from:" "from:" "reply-to:" "sender:" "to:" "apparently-to:" "cc:" "subject:" "date:" "delivered-to:" "return-path:")) + (setq vm-reply-ignored-addresses '("mdw@excessus\\.demon\\.co\\.uk" "mdw@nsict\\.org" "mdw@eh\\.org" "mdw@ncipher\\.com"