Article View: gnu.emacs.help
Article #189192Re: Automatic mail copies in .mailrc? (was Re: How to copy mail message to a file?)
From: Dan_Jacobson
Date: Wed, 10 Apr 1991 14:53
Date: Wed, 10 Apr 1991 14:53
39 lines
2467 bytes
2467 bytes
>>>>> On 10 Apr 91 00:41:45 GMT, meb4593@galileo.rtn.ca.boeing.com (9526 BE31R) said:
9526> I saw that the variable `mail-archive-file-name' can be set, but
9526> this implies that only one file can be setup for all of my
9526> copies without the flexibility of setting up several files. Is
9526> there a way to set this up so that I can specify different FCCs
9526> for different individuals?
Well, here's how I set a dynamic FCC (e.g., today's is "FCC:
/usr/tmp/danj1Wed10Apr", could make it different by the hour too...)
for my outbound GNUS articles... pehaps you could do similarly in
mail-setup-hook or something...
(setq
news-reply-mode-hook
(function
(lambda ()
(my-sc-overload-hook-func)
(setq
gnus-author-copy
;;from gnuspost.el
(let ((date (current-time-string)))
(if
(string-match
"^[^ ]+ \\([^ ]+\\)[ ]+\\([0-9]+\\) \\([0-9]+\\):\\([0-9]+\\):\\([0-9]+\\) [0-9][0-9]\\([0-9][0-9]\\)"
date)
(concat "/usr/tmp/" (user-login-name)
(substring date 0 3) ;day of week (DJ)
(substring date (match-beginning 2) (match-end 2)) ;Day
;;; (substring date (match-beginning 6) (match-end 6)) ;Year
(substring date (match-beginning 1) (match-end 1)) ;Month
;;; (substring date (match-beginning 3) (match-end 3)) ;Hour
;;; (substring date (match-beginning 4) (match-end 4)) ;Minute
;;; (substring date (match-beginning 5) (match-end 5)) ;Second
)
(error "Cannot understand current-time-string: %s." date))
)))))
--
Dan_Jacobson@ATT.COM Naperville IL USA +1 708 979 6364
Technical Details
Message-ID:
<DANJ1.91Apr10095302@cbnewse.ATT.COM>Path:
arc1-ca.pugleaf.net!gmdzi!unido!mcsun!uunet!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!linac!att!cbnewse!danj1References:
<348@galileo.rtn.ca.boeing.com> <1991Apr6.153443.11462@uai.com> <353@galileo.rtn.ca.boeing.com>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103b8b,ce5e624321ac59bd X-Google-Attributes: gid103b8b,public X-Google-ArrivalTime: 1991-04-11 00:37:25 PST Path: arc1-ca.pugleaf.net!gmdzi!unido!mcsun!uunet!zaphod.mps.ohio-state.edu!pacific.mps.ohio-state.edu!linac!att!cbnewse!danj1 From: Dan_Jacobson@ATT.COM Newsgroups: gnu.emacs.help Subject: Re: Automatic mail copies in .mailrc? (was Re: How to copy mail message to a file?) Message-ID: <DANJ1.91Apr10095302@cbnewse.ATT.COM> Date: 10 Apr 91 14:53:11 GMT References: <348@galileo.rtn.ca.boeing.com> <1991Apr6.153443.11462@uai.com> <353@galileo.rtn.ca.boeing.com> Sender: danj1@cbnewse.att.com (Dan Jacobson) Reply-To: Dan_Jacobson@ihlpz.ATT.COM Organization: AT&T-BL, Naperville IL, USA Lines: 39 In-Reply-To: meb4593@galileo.rtn.ca.boeing.com's message of 10 Apr 91 00:41:45 GMT