From: Juhapekka Tolvanen <SNAFU.juhtolv@iki.fi.FUBAR.invalid>
Subject: Re: How to use Maildir for everything? How to duplicate behaviour of mutt?
Date: Thu, 30 Sep 2004 22:32:53 +0300 [thread overview]
Message-ID: <87acv78sd6.fsf@heresy.ainola.jyu.fi> (raw)
In-Reply-To: <87acv8jprb.fsf@heresy.ainola.jyu.fi>
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
next prev parent reply other threads:[~2004-09-30 19:32 UTC|newest]
Thread overview: 4+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <87ekkrjpzm.fsf@heresy.ainola.jyu.fi>
2004-09-27 14:30 ` Paul Jarc
2004-09-27 16:31 ` Juhapekka Tolvanen
[not found] ` <87u0thcwx2.fsf@heresy.ainola.jyu.fi>
[not found] ` <m3zn39b0cg.fsf@multivac.cwru.edu>
[not found] ` <878yatvyoq.fsf@heresy.ainola.jyu.fi>
[not found] ` <85wtycy7ne.fsf@obelix.seki.fr>
[not found] ` <87acv8jprb.fsf@heresy.ainola.jyu.fi>
2004-09-30 19:32 ` Juhapekka Tolvanen [this message]
2004-10-01 8:05 ` Sebastien Kirche
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87acv78sd6.fsf@heresy.ainola.jyu.fi \
--to=snafu.juhtolv@iki.fi.fubar.invalid \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).