Add fluff

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

diff --git a/gnus b/gnus
index 4b8f4703ba59b919c49b2da1409b7a00d05a03ea..4a9f02362be911db98f0dedd968ed612a6627c96 100644 (file)
--- a/gnus
+++ b/gnus
@@ -217,6 +217,7 @@ inserts \" characters."
   (interactive)
   (save-excursion
     (if (or (string= (message-fetch-field "From") "Andreas Tille <tillea@rki.de>")
+            (string= (message-fetch-field "From") "md@Linux.IT (Marco d'Itri)")
             (string= (message-fetch-field "From") "Nathanael Nerode <neroden@twcny.rr.com>"))
         (let ((inhibit-point-motion-hooks t)
               buffer-read-only)
@@ -264,6 +265,7 @@ inserts \" characters."
        ("^nnml:jobb.opera.elektra" "opera.SCORE")))
 
 (setq gnus-use-cache t
+      gnus-agent-cache nil
       message-kill-buffer-on-exit t
       nnvirtual-always-rescan t
       rmail-dont-reply-to-names "tfheen\\|tollef\\|nobody\\|never\\|none"
@@ -303,6 +305,7 @@ inserts \" characters."
       mc-gpg-comment "Please see my GPG key at http://err.no/gpgkey.asc"
       gnus-simplify-ignored-prefixes "^\\([Aa][Dd]: \\|[Ss][Vv]: \\|[Rr][Ee]: \\)+"
       message-yank-prefix "| "
+      message-yank-empty-prefix "| "
       message-yank-cited-prefix "| "
       message-citation-line-function 'tfh-insert-citation-line
       message-cite-function 'tfheen-cite-function
@@ -310,7 +313,7 @@ inserts \" characters."
       gnus-summary-mode-line-format "Gnus: %G [%A] %Z")
 
 (setq gnus-uncacheable-groups "^nnml")
-; (add-to-list 'mm-discouraged-alternatives "text/html")
+(add-to-list 'mm-discouraged-alternatives "text/html")
 
 ;; text processing definitions
 
@@ -387,7 +390,8 @@ inserts \" characters."
 Send bidrag til no-alt-gullkorn@moderators.usenet.no
 OBS: <URL:http://www.stud.ifi.uio.no/~jani/OBS/no-alt-gullkorn.shtml>")))
     ((and (message-mail-p) (stringp gnus-newsgroup-name))
-     ("Mail-Followup-To" (gnus-group-get-parameter gnus-newsgroup-name 'to-address)))
+     ("Mail-Followup-To" (or (gnus-mailing-list-followup-to)
+                             (gnus-group-get-parameter gnus-newsgroup-name 'to-address))))
 ;     ("Mail-Followup-To" (or (gnus-group-get-parameter gnus-newsgroup-name 'to-address)
 ;                             (if (tfheen-debian-group-p)
 ;                                 (mapconcat '(lambda(x) 
@@ -599,7 +603,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@\\(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\\|tfheen@canonical.com\\|tollef-[^@]*@add\\.no")
+      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")
 
 (cw/requiring-package (deuglify))