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

[Juhapekka Tolvanen]

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

> prj@po.cwru.edu (Paul Jarc) writes:
>
>> Juhapekka Tolvanen <FUBAR.juhtolv@iki.fi.SNAFU.invalid> wrote:

>>> And how can I convert those News articles I already have there to
>>> Maildir-format? According to file-command they are in emacs
>>> RMAIL-format.
>
>> You could temporarily create an nnbabyl server to access those as Gnus
>> groups, and use B c to copy the articles to nnmaildir groups.
>
> Argh... Do you know any other ways to convert from RMAIL-format to mbox
> or Maildir? I can use mbox-format as intermediate format and then
> convert that to Maildir.

I just found out that a software called b2m can convert from RMAIL/BABYL
to mbox. It is included in emacs.

>>> [When I send my E-Mail, a copy of it is saved to
>>> ~/Maildir.save/sent-mail-YYYY-MM where YYYY is substituted with
>>> number of year and YY is substituted with number of month (leading
>>> zero included)]
>
>> That can be done with a little Lisp.  I've never done it, so I don't
>> know the details.
>
> I reiterate: I can not code in elisp. Any takers?

Here is one unsuccesfull attempt:

(setq gnus-message-archive-group '(concat 
"nnmaildir:sent-mail-"(format-time-string "%Y-%m") ) )

Hopefully somebody can fix it.


>>> my_hdr From: Juhapekka Tolvanen <juhtolv@cc.jyu.fi>
>>> my_hdr Reply-To: Juhapekka Tolvanen <juhtolv@iki.fi>
>
>>> [Those headers are added to each mail]
>
>> I do this with posting styles, but there are other ways too.
>
> Here are my current posting styles from ~/.gnus.el :

This works!:

(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")
                 )
                )
          )

> Now, I want to be sure, that my Gnus never expires my E-Mails
> automatically. I am used to do this: I sometimes burn my mailfolders to
> CD-R. Then I delete old my E-Mails by hand.
>

This seems to work:

(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)




-- 
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