Add linpro setup

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

diff --git a/gnus b/gnus
index 41c4eefc56df89667783661be148ce3e969fb3b0..37cf9082efd35dfab3e3d91f57271ecc93ceed43 100644 (file)
--- a/gnus
+++ b/gnus
@@ -53,6 +53,17 @@
   (add-to-list 'gnus-secondary-select-methods '(nntp "news.hardware.no"))
   )
 
+(cw/for-host "luxevop"
+  (setq gnus-select-method '(nnimap "linpro"
+                                   (nnimap-address "imap.linpro.no")
+                                   (nnimap-server-port 993)
+                                   (nnimap-stream ssl)
+                                    (nnimap-authinfo-file "~/.imap-authinfo")))
+  (add-to-list 'gnus-secondary-select-methods '(nntp "nntp.linpro.no"
+                                                    (nntp-port-number 563)
+                                                    (nntp-open-connection-function nntp-open-ssl-stream))))
+
+
 (cw/for-host "vawad"
   (setq gnus-select-method '(nnimap "raw"
                                     (nnimap-address "mail.raw.no")
@@ -356,9 +367,12 @@ inserts \" characters."
   '(
     ; Default-verdier
     (".*" 
-     (address "tfheen@err.no")
+     (address (if (string-match system-name "luxevop") "tfheen@linpro.no" "tfheen@err.no"))
+
 ;     (Organization "Private")
-     (Bcc (concat "tfheen+outgoing" (char-to-string 64) "err.no")))
+     (Bcc (if (string-match system-name "luxevop")
+        (concat "tfheen+outgoing" (char-to-string 64)  "linpro.no")
+        (concat "tfheen+outgoing" (char-to-string 64)  "err.no"))))
 
     ;; Du vil sikkert ha mer her enn det følgende:
     ("drift.news.nag.submissions" ;; Antar at man får moderator-mail hit
@@ -616,7 +630,7 @@ on multiple mail-followup-to headers"
 
 (add-hook 'message-header-setup-hook 'message-subject-strip-any-re)
 (setq gnus-treat-display-smileys nil
-      gnus-ignored-from-addresses "tfheen@\\(canonical.com\\|ubuntu.com\\|add\\.no\\|idi\\.ntnu\\.no\\|debian\\.org\\|stud\\.ntnu\\.no\\|hardware\\.no\\|raw\\.no\\|err.no\\|samfundet\\.no\\|uka\\.no\\|pvv\\.\\(org\\|ntnu.no\\)\\)\\|tollef@add\\.no\\|tollef-[^@]*@add\\.no")
+      gnus-ignored-from-addresses "tfheen@\\(linpro.no\\|canonical.com\\|ubuntu.com\\|add\\.no\\|idi\\.ntnu\\.no\\|debian\\.org\\|stud\\.ntnu\\.no\\|hardware\\.no\\|raw\\.no\\|err.no\\|samfundet\\.no\\|uka\\.no\\|pvv\\.\\(org\\|ntnu.no\\)\\)\\|tollef@add\\.no\\|tollef-[^@]*@add\\.no")
 
 (cw/requiring-package (deuglify))