From: tfheen <tfheen@8da78d58-1cd3-0310-bee5-d77bd1b3e8bf>
Date: Wed, 5 Mar 2008 07:28:50 +0000 (+0000)
Subject: Add linpro setup
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=df945632c3105e613ee0cc0e7e381b6e2d588a54;p=dotfiles

Add linpro setup

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

diff --git a/gnus b/gnus
index 41c4eef..37cf908 100644
--- 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))