From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/34757
Path: main.gmane.org!not-for-mail
From: ShengHuo ZHU <zsh@cs.rochester.edu>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: gnus-mail-save-name: folder based on sender?
Date: 13 Feb 2001 00:12:00 -0500
Sender: owner-ding@hpc.uh.edu
Message-ID: <2nelx3go9r.fsf@tiger.jia.vnet>
References: <20010212225959.21787.qmail@web10007.mail.yahoo.com>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1035170622 31964 80.91.224.250 (21 Oct 2002 03:23:42 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Mon, 21 Oct 2002 03:23:42 +0000 (UTC)
Return-Path: <owner-ding@hpc.uh.edu>
Original-Received: from karazm.math.uh.edu (karazm.math.uh.edu [129.7.128.1])
	by mailhost.sclp.com (Postfix) with ESMTP id F3F50D04A0
	for <jason@mastaler.com>; Tue, 13 Feb 2001 00:12:40 -0500 (EST)
Original-Received: from sina.hpc.uh.edu (lists@Sina.HPC.UH.EDU [129.7.3.5])
	by karazm.math.uh.edu (8.9.3/8.9.3) with ESMTP id XAC19240;
	Mon, 12 Feb 2001 23:12:06 -0600 (CST)
Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 12 Feb 2001 23:11:27 -0600 (CST)
Original-Received: from mailhost.sclp.com (postfix@66-209.196.61.interliant.com [209.196.61.66] (may be forged))
	by sina.hpc.uh.edu (8.9.3/8.9.3) with ESMTP id XAA25057
	for <ding@hpc.uh.edu>; Mon, 12 Feb 2001 23:11:17 -0600 (CST)
Original-Received: from zsh.yi.org (roc-24-93-30-91.rochester.rr.com [24.93.30.91])
	by mailhost.sclp.com (Postfix) with ESMTP id D30CCD04A0
	for <ding@gnus.org>; Tue, 13 Feb 2001 00:11:42 -0500 (EST)
Original-Received: (from zsh@localhost)
	by zsh.yi.org (8.11.0/8.10.0) id f1D5C0E30796;
	Tue, 13 Feb 2001 00:12:00 -0500
Original-To: ding@gnus.org
X-Attribution: ZSH
X-Face: 'IF:e51ib'Qbl^(}l^&4-J`'P!@[4~O|&k#:@Gld#b/]oMq&`&FVY._3+b`mzp~Jeve~/#/
 ERD!OTe<86UhyN=l`mrPY)M7_}`Ktt\K+58Z!hu7>qU,i.N7TotU[FYE(f1;}`g2xj!u*l`^&=Q!g{
 *q|<EDbQtg9{wfQuI,#r#{'A,\!95my:/,]"s,O4nzqxNL.}WrHA>ddto|nkt"$r,K$[)"|6,elPH=
 GJ6Q
In-Reply-To: <20010212225959.21787.qmail@web10007.mail.yahoo.com> (lewst's message of "Mon, 12 Feb 2001 14:59:59 -0800 (PST)")
User-Agent: Gnus/5.090001 (Oort Gnus v0.01) Emacs/21.0.98
Precedence: list
X-Majordomo: 1.94.jlt7
Original-Lines: 26
Xref: main.gmane.org gmane.emacs.gnus.general:34757
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:34757

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