Random updates

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

diff --git a/gnus b/gnus
index c5bd0fbcbc3478447592b9ced71456d19da5a2db..abf025d0016daf5d4368659e092b762dc3d9f02e 100644 (file)
--- a/gnus
+++ b/gnus
@@ -112,7 +112,8 @@ inserts \" characters."
   (setq gnus-message-archive-group
         '((if (message-news-p)
               "misc-news"
-            (format-time-string "out.%Y.out-%Y-%m")))))
+            (format-time-string "out.%Y.out-%Y-%m")))
+        gnus-message-archive-method "nnimap+err"))
 
 (cw/for-host "vawad"
   (setq gnus-message-archive-group
@@ -210,7 +211,7 @@ inserts \" characters."
           (goto-char (point-min))
           (replace-regexp "^\\.\\." "")
           (goto-char (point-min))
-          (replace-regexp " ? ?;-)$" "")))))
+          (replace-regexp " ? ?;[-o])$" "")))))
 
 (defun tfheen-de-tillify ()
   (interactive)
@@ -612,7 +613,8 @@ on multiple mail-followup-to headers"
 (cw/for-host "yiwaz\\|thosu\\|golem"
   (define-key gnus-summary-backend-map "s" 'tfheen-mark-as-spam)
   (define-key gnus-summary-mode-map "z" 'tfheen-mark-as-spam)
-  (setq pgg-default-user-id "tfheen@raw.no"))
+  (setq pgg-default-user-id "tfheen@raw.no")
+  (setq gnus-subscribe-newsgroup-method 'gnus-subscribe-topics))
 
 (defun tfheen-pvv-split-du-list-and-mail (s)
   (interactive "sdu-string:")