Gnus development mailing list
 help / color / mirror / Atom feed
* gnus-message-archive-group Q.
@ 2001-03-10  0:36 Dmitry Yaitskov
  2001-03-10  0:43 ` Paul Jarc
  0 siblings, 1 reply; 10+ messages in thread
From: Dmitry Yaitskov @ 2001-03-10  0:36 UTC (permalink / raw)


Hi,

There are a few samples for gnus-message-archive-group, including

     (setq gnus-message-archive-group
           '(("^alt" "sent-to-alt")
             ("mail" "sent-to-mail")
             (".*" "sent-to-misc")))

and

     (setq gnus-message-archive-group
           '((if (message-news-p)
                 "misc-news"
               (concat "mail." (format-time-string "%Y-%m")))))

But how can I say something like:

     (setq gnus-message-archive-group
           '(("^alt" "sent-to-alt")
             ("mail" (concat "mail." (format-time-string "%Y-%m")))
             (".*" "sent-to-misc")))


The docs for gnus-message-archive-group say that it can be set to "an
alist of regexps, functions and forms When a key "matches", the result
is used." - this seems to be what I need, but I couldn't figure out a
way to set it (the gnus-inews-insert-archive-gcc function treats the
"(concat..." in the last example to be a string). Thanks.

-- 
Cheers,
-Dima.



^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-10  0:36 gnus-message-archive-group Q Dmitry Yaitskov
@ 2001-03-10  0:43 ` Paul Jarc
  2001-03-10 12:05   ` Kai Großjohann
  2001-03-10 15:27   ` Dmitry Yaitskov
  0 siblings, 2 replies; 10+ messages in thread
From: Paul Jarc @ 2001-03-10  0:43 UTC (permalink / raw)
  Cc: Ding

Dmitry Yaitskov <dimas@home.com> writes:
> But how can I say something like:
> 
>      (setq gnus-message-archive-group
>            '(("^alt" "sent-to-alt")
>              ("mail" (concat "mail." (format-time-string "%Y-%m")))
>              (".*" "sent-to-misc")))

Assuming you don't leave Emacs running for days at a time:
(setq gnus-message-archive-group
      `(("^alt" "sent-to-alt")
        ("mail" ,(concat "mail." (format-time-string "%Y-%m")))
        (".*" "sent-to-misc")))

This will determine the group name once when you first evaluate it; if
the month changes while Emacs is running, the group name won't be
updated unless you re-eval the setq form.


paul


^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-10  0:43 ` Paul Jarc
@ 2001-03-10 12:05   ` Kai Großjohann
  2001-03-10 15:27   ` Dmitry Yaitskov
  1 sibling, 0 replies; 10+ messages in thread
From: Kai Großjohann @ 2001-03-10 12:05 UTC (permalink / raw)
  Cc: dimas

On 09 Mar 2001, Paul Jarc wrote:

>         ("mail" ,(concat "mail." (format-time-string "%Y-%m")))

Suggestion: (format-time-string "mail.%Y-%m")

kai
-- 
Be indiscrete.  Do it continuously.


^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-10  0:43 ` Paul Jarc
  2001-03-10 12:05   ` Kai Großjohann
@ 2001-03-10 15:27   ` Dmitry Yaitskov
  2001-03-10 15:48     ` Kai Großjohann
  1 sibling, 1 reply; 10+ messages in thread
From: Dmitry Yaitskov @ 2001-03-10 15:27 UTC (permalink / raw)
  Cc: ding, dimas

prj@po.cwru.edu (Paul Jarc) wrote:

> Dmitry Yaitskov <dimas@home.com> writes:
> > But how can I say something like:
> > 
> >      (setq gnus-message-archive-group
> >            '(("^alt" "sent-to-alt")
> >              ("mail" (concat "mail." (format-time-string "%Y-%m")))
> >              (".*" "sent-to-misc")))
> 
> Assuming you don't leave Emacs running for days at a time:
> (setq gnus-message-archive-group
>       `(("^alt" "sent-to-alt")
>         ("mail" ,(concat "mail." (format-time-string "%Y-%m")))
>         (".*" "sent-to-misc")))
> 
> This will determine the group name once when you first evaluate it; if
> the month changes while Emacs is running, the group name won't be
> updated unless you re-eval the setq form.

Thanks. Unfortunately (?) I do leave Emacs running (unless I update
the sources and rebuild it), sometimes for weeks even.

> paul
> 
> 

-- 
Cheers,
-Dima.



^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-10 15:27   ` Dmitry Yaitskov
@ 2001-03-10 15:48     ` Kai Großjohann
  2001-03-10 16:13       ` Oystein Viggen
                         ` (2 more replies)
  0 siblings, 3 replies; 10+ messages in thread
From: Kai Großjohann @ 2001-03-10 15:48 UTC (permalink / raw)
  Cc: Ding

On 10 Mar 2001, Dmitry Yaitskov wrote:

> Thanks. Unfortunately (?) I do leave Emacs running (unless I update
> the sources and rebuild it), sometimes for weeks even.

You might be able to arrange to have Emacs execute that statement
every day, for example with midnight.el.

kai
-- 
Be indiscrete.  Do it continuously.


^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-10 15:48     ` Kai Großjohann
@ 2001-03-10 16:13       ` Oystein Viggen
  2001-03-10 21:04       ` Paul Jarc
  2001-03-12 15:14       ` Dmitry Yaitskov
  2 siblings, 0 replies; 10+ messages in thread
From: Oystein Viggen @ 2001-03-10 16:13 UTC (permalink / raw)


Kai Großjohann wrote: 

> You might be able to arrange to have Emacs execute that statement
> every day, for example with midnight.el.

Sounds to me like a job for the gnus-demon.

Oystein
-- 
This message was generated by a flock of happy penguins.


^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-10 15:48     ` Kai Großjohann
  2001-03-10 16:13       ` Oystein Viggen
@ 2001-03-10 21:04       ` Paul Jarc
  2001-03-12 15:14       ` Dmitry Yaitskov
  2 siblings, 0 replies; 10+ messages in thread
From: Paul Jarc @ 2001-03-10 21:04 UTC (permalink / raw)


Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Großjohann) writes:
> On 10 Mar 2001, Dmitry Yaitskov wrote:
> > Thanks. Unfortunately (?) I do leave Emacs running (unless I update
> > the sources and rebuild it), sometimes for weeks even.
> 
> You might be able to arrange to have Emacs execute that statement
> every day, for example with midnight.el.

Or add it to some hook, if there's an appropriate one.  Is there?


paul


^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-10 15:48     ` Kai Großjohann
  2001-03-10 16:13       ` Oystein Viggen
  2001-03-10 21:04       ` Paul Jarc
@ 2001-03-12 15:14       ` Dmitry Yaitskov
  2001-03-12 18:40         ` Colin Marquardt
  2 siblings, 1 reply; 10+ messages in thread
From: Dmitry Yaitskov @ 2001-03-12 15:14 UTC (permalink / raw)


Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Groъjohann) wrote:

> On 10 Mar 2001, Dmitry Yaitskov wrote:
> 
> > Thanks. Unfortunately (?) I do leave Emacs running (unless I update
> > the sources and rebuild it), sometimes for weeks even.
> 
> You might be able to arrange to have Emacs execute that statement
> every day, for example with midnight.el.

Thanks for the idea (and to Paul Jarc for the idea to do that in a
hook). But what (and where) is midnight.el?

> kai

-- 
Cheers,
-Dima.



^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-12 15:14       ` Dmitry Yaitskov
@ 2001-03-12 18:40         ` Colin Marquardt
  2001-03-16 21:18           ` Dmitry Yaitskov
  0 siblings, 1 reply; 10+ messages in thread
From: Colin Marquardt @ 2001-03-12 18:40 UTC (permalink / raw)


Dmitry Yaitskov <dimas@home.com> writes:

> hook). But what (and where) is midnight.el?

http://www.google.com/search?q=midnight.el, the 3rd link.

HTH,
  Colin


^ permalink raw reply	[flat|nested] 10+ messages in thread

* Re: gnus-message-archive-group Q.
  2001-03-12 18:40         ` Colin Marquardt
@ 2001-03-16 21:18           ` Dmitry Yaitskov
  0 siblings, 0 replies; 10+ messages in thread
From: Dmitry Yaitskov @ 2001-03-16 21:18 UTC (permalink / raw)


Thanks.

Colin Marquardt <colin.marquardt@usa.alcatel.com> wrote:

> Dmitry Yaitskov <dimas@home.com> writes:
> 
> > hook). But what (and where) is midnight.el?
> 
> http://www.google.com/search?q=midnight.el, the 3rd link.
> 
> HTH,
>   Colin
> 
> 

-- 
Cheers,
-Dima.



^ permalink raw reply	[flat|nested] 10+ messages in thread

end of thread, other threads:[~2001-03-16 21:18 UTC | newest]

Thread overview: 10+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2001-03-10  0:36 gnus-message-archive-group Q Dmitry Yaitskov
2001-03-10  0:43 ` Paul Jarc
2001-03-10 12:05   ` Kai Großjohann
2001-03-10 15:27   ` Dmitry Yaitskov
2001-03-10 15:48     ` Kai Großjohann
2001-03-10 16:13       ` Oystein Viggen
2001-03-10 21:04       ` Paul Jarc
2001-03-12 15:14       ` Dmitry Yaitskov
2001-03-12 18:40         ` Colin Marquardt
2001-03-16 21:18           ` Dmitry Yaitskov

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