From ee4a0bd5810b364aead7758b6c5dfdb686c87878 Mon Sep 17 00:00:00 2001 From: Ryan Kavanagh Date: Tue, 12 Mar 2013 10:17:35 -0400 Subject: Add vm advice for colouring --- .vm | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) diff --git a/.vm b/.vm index d2d3426..dc72d50 100644 --- a/.vm +++ b/.vm @@ -13,6 +13,17 @@ (require 'u-vm-color) (add-hook 'vm-select-message-hook 'u-vm-color-fontify-buffer) (add-hook 'vm-summary-mode-hook 'u-vm-color-summary-mode) +(defadvice vm-fill-paragraphs-containing-long-lines + (after u-vm-color activate) + (u-vm-color-fontify-buffer)) +(defadvice vm-show-current-message (after u-vm-color activate) + (u-vm-color-fontify-buffer-even-more)) +(defadvice vm-decode-mime-message (after u-vm-color activate) + (u-vm-color-fontify-buffer-even-more)) + +;; fill paragraphs to 72 chars +(setq vm-fill-paragraphs-containing-long-lines-in-reply 72) +(setq vm-word-wrap-paragraphs-in-reply t) ; Setup a shortcut to the whole visit-imap-folder nonsense (defalias 'imap 'vm-visit-imap-folder) @@ -149,10 +160,6 @@ (setq vm-summary-format "%n %*%a %-17.17F %2y %-3.3m %2d (%-4l) %4l/%-5c %I\"%s\" ") -;; fill paragraphs to 72 chars -(setq vm-fill-paragraphs-containing-long-lines-in-reply 72) -(setq vm-word-wrap-paragraphs-in-reply t) - ;; BBDB (require 'bbdb) (bbdb-initialize 'vm) -- cgit v1.2.3