Gnus development mailing list
 help / color / mirror / Atom feed
From: ShengHuo ZHU <zsh@cs.rochester.edu>
Subject: Re: gnus-mail-save-name: folder based on sender?
Date: 13 Feb 2001 00:12:00 -0500	[thread overview]
Message-ID: <2nelx3go9r.fsf@tiger.jia.vnet> (raw)
In-Reply-To: <20010212225959.21787.qmail@web10007.mail.yahoo.com> (lewst's message of "Mon, 12 Feb 2001 14:59:59 -0800 (PST)")

lewst <lewst@yahoo.com> writes:

> When saving mail messages with `o', I'd like it if Gnus could choose a
> folder based on the username of the sender rather than the name of the
> group.  For example, `o' on one of Lars' articles would prompt for
> ~/Mail/Archive/larsi
> 
> Has anyone tweaked `gnus-mail-save-name' to do this?

Do you want this?

(defun gnus-sender-save-name (newsgroup headers &optional last-file)
  "Generate file name from sender."
  (let ((from (mail-header-from headers)))
    (expand-file-name
     (if (and from (string-match "\\([^ <]+\\)@" from))
	 (match-string 1 from)
       "misc")
     gnus-article-save-directory)))

ShengHuo

-- 
(setq gnus-posting-styles 
      '((".*" (signature (format "(setq gnus-posting-styles 
      '%S)" gnus-posting-styles)))))



  reply	other threads:[~2001-02-13  5:12 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2001-02-12 22:59 lewst
2001-02-13  5:12 ` ShengHuo ZHU [this message]
2001-02-13 18:07   ` lewst
2001-02-13 18:28     ` ShengHuo ZHU
2001-02-13 19:06   ` lewst

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=2nelx3go9r.fsf@tiger.jia.vnet \
    --to=zsh@cs.rochester.edu \
    /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).