From: tfheen <tfheen@8da78d58-1cd3-0310-bee5-d77bd1b3e8bf>
Date: Mon, 15 May 2006 17:24:47 +0000 (+0000)
Subject: Fix some host handling
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b13caa6daad3404b57c3d4a2208b33ff6e3181b3;p=dotfiles

Fix some host handling

git-svn-id: file:///svn/tfheen/trunk/dotfiles@907 8da78d58-1cd3-0310-bee5-d77bd1b3e8bf
---

diff --git a/gnus b/gnus
index 4a9f023..ac1aba0 100644
--- a/gnus
+++ b/gnus
@@ -21,7 +21,7 @@
     (car list)))
 
 
-(cw/for-host "thosu"
+(cw/for-host "thosu\\|xoog"
   (setq gnus-select-method '(nnimap "err"
                                     (nnimap-address "mail.err.no")
                                     (nnimap-stream ssl)
@@ -686,17 +686,16 @@ Tollef Fog Heen
       nnmail-use-long-file-names t)
 
 ; a bit snaer HTML handling
-(add-to-list 'mm-text-html-renderer-alist
-             '(vilistextum mm-inline-render-with-file
-               mm-links-remove-leading-blank
-               "vilistextum" "-l" "-r" "-c" "-s" file "-"))
-
-(add-to-list 'mm-text-html-washer-alist 
-             '(vilistextum mm-inline-wash-with-file
-               mm-links-remove-leading-blank
-               "vilistextum" "-l" "-r" "-c" "-s" file "-"))
-
-(setq mm-text-html-renderer 'vilistextum)
+(cw/for-host "thosu"
+  (add-to-list 'mm-text-html-renderer-alist
+               '(vilistextum mm-inline-render-with-file
+                             mm-links-remove-leading-blank
+                             "vilistextum" "-l" "-r" "-c" "-s" file "-"))
+  (add-to-list 'mm-text-html-washer-alist 
+               '(vilistextum mm-inline-wash-with-file
+                             mm-links-remove-leading-blank
+                             "vilistextum" "-l" "-r" "-c" "-s" file "-"))
+  (setq mm-text-html-renderer 'vilistextum))
 
 (defsubst gnus-article-sort-by-message-id (h1 h2)
   "Sort articles by message id length."