Re: How to use Maildir for everything? How to duplicate behaviour of mutt?

[Juhapekka Tolvanen]

Juhapekka Tolvanen <SNAFU.juhtolv@iki.fi.FUBAR.invalid> writes:

> Meanwhile, I'll take your elisp-snippet and tune it for my
> Maildir-folders. Thanks!

Here it is and it works:

;; Save sent E-Mail messages to sent-mail-YYYY-MM
;; Save sent Usenet News articles to sent-news-YYYY-MM
(setq gnus-message-archive-group
          '((if (message-news-p)
                        (concat "nnmaildir:sent-news-" (format-time-string 
"%Y-%m"))
                  (concat "nnmaildir:sent-mail-" (format-time-string "%Y-%m"))
                  )
                )
          )

Today I also made some hack for converting RMAIL/BABYL-folders to
mbox-format and then to Maildir format.

http://iki.fi/juhtolv/configs/gnus/

This system has just one drawback: Now Gnus can not show if article in
Summary-buffer is saved. But I watch very seldom those articles I have
already read or marked read.

I tried first a software called mb2md, but it was really buggy:

http://batleth.sapienti-sat.org/projects/mb2md/

If you know how to fix it, please do it. Meanwhile I can use that script
called mbox2maildir . I don't remember how I found it.

You may also find these scripts useful, no matter if you were mutt-user:

http://iki.fi/juhtolv/configs/gnus/mutt/

Well, my Gnus configuration is mostly ready. Here are relevant parts
that were needed to enable usage of Gnus for E-Mail in My Way(tm):

(setq gnus-posting-styles
      '(
                (".*"                  ;;default
                 (name "Juhapekka Tolvanen")
         (signature-file "~/.signature")
         (organization "What?+ Me organized?+ Never!1")
                 )
        (message-news-p        ;; A function symbol: Usenet News
         (address "SNAFU.juhtolv@iki.fi.FUBAR.invalid")
                 ("Reply-To" "SNAFU.juhtolv@iki.fi.FUBAR.invalid")
                 )
        (message-mail-p        ;; A function symbol: E-Mail
         (address "juhtolv@cc.jyu.fi")
                 ("Reply-To" "juhtolv@iki.fi")
                 )
                )
          )

(setq gnus-visible-headers
      (quote ("^Posted-To:" "^X-CRM114-Status:" "^X-CRM114-Score:" 
"^X-CRM114-Action:" "^X-Reject:" "^X-Spam-Status:" "^X-Spam-Level:"
"^X-Spam-Report:" "^X-Spam-Flag:" "^X-Spam-Checker-Version:" "^X-Pyzor:" 
"^X-Spam-Pyzor:" "^X-DCC-SdV-Metrics:"
"^X-DCC-MessageCare-Metrics:" "^X-DCC-dmv.com-Metrics:" "^X-Spam-DCC:" 
"^X-Spam-Checked:" "^X-Spam-Status:" "^X-Virus-Scanned:"
"^X-scanner:" "^Subject:" "^Newsgroups:" "^Date:" "^From:" "^Organization:" 
"^To:" "^Cc:" "^[BGF]?Cc:"  "^Reply-To:" "^Resent-From:"
"^Mail-Followup-To:" "^Followup-To:" "^Mail-Copies-To:" "^Apparently-To:" 
"^Summary:" "^Keywords:" "^X-Keywords:" "^X-Mailing-List:"
"^Old-Return-Path:" "^Delivered-To:" "^In-Reply-To:" "^X-Originating-Email:" 
"^Message-ID:" "^X-Lotus-FromDomain:"
"^X-Mailer:" "^X-Newsreader:" "^X-Agent:" "^User-Agent:" "^X-Newsreader" 
"^X-Mailer-URL:" "^X-Operating-System:" "^X-OS:" "^X-Editor:"
"^X-Uptime:" "Content-Type:" "^Gnus-Warning:")
                         )
          )


(setq mail-sources nil)
(setq nnmail-spool-file nil)


(add-to-list 'gnus-secondary-select-methods
             '(nnmaildir "" (directory "~/Maildir.gnus")))

;; Avoid marking read articles expirable:
(remove-hook 'gnus-mark-article-hook
             'gnus-summary-mark-read-and-unread-as-read)
(add-hook 'gnus-mark-article-hook 'gnus-summary-mark-unread-as-read)

;; Save sent E-Mail messages to sent-mail-YYYY-MM
;; Save sent Usenet News articles to sent-news-YYYY-MM
(setq gnus-message-archive-group
          '((if (message-news-p)
                        (concat "nnmaildir:sent-news-" (format-time-string 
"%Y-%m"))
                  (concat "nnmaildir:sent-mail-" (format-time-string "%Y-%m"))
                  )
                )
          )

Maybe I'll release all my emacs and Gnus-configs some day in the WWW.

Once again: Thank you!

-- 
Juhapekka "naula" Tolvanen * http colon slash slash iki dot fi slash juhtolv
"halpojen hoitojen maailma uljas haluaa taistosi latistaa, mielesi
lipeävedellä valkaistuun ruotuunsa, joka on hautausmaa"                  CMX