* Re: Bug in gnus-group-read-ephemeral-group (Gnus v5.9.0)
[not found] <958686cf.0212020535.75d89a40@posting.google.com>
@ 2002-12-08 20:22 ` Kai Großjohann
0 siblings, 0 replies; only message in thread
From: Kai Großjohann @ 2002-12-08 20:22 UTC (permalink / raw)
Jens.Schmidt27@epost.de (Jens Schmidt) writes:
> In gnus-group-read-ephemeral-group a new (ephemeral) method gets constructed
> in the following lines:
>
> (setq method
> `(,(car method) ,(concat (cadr method) "-ephemeral")
> (,(intern (format "%s-address" (car method))) ,(cadr method))
> ,@(cddr method)))
Do you know what to do here? Does this work?
(let ((mtyp (car method))
(nnam (cadr method))
(mbdy (cddr method)))
(if (assoc (intern (format "%s-address" (symbol-name mtyp))) mbdy)
(setq method `(,mtyp ,(concat mnam "-ephemeral") ,@mbdy))
(setq method `(,mtyp ,(concat mnam "-ephemeral")
(,(intern (format "%s-address" (symbol-name mtyp)))
,(mnam))
,@mbdy))))
Whee. What a piece of code. Oh, well.
--
~/.signature is: umop ap!sdn (Frank Nobis)
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2002-12-08 20:22 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
[not found] <958686cf.0212020535.75d89a40@posting.google.com>
2002-12-08 20:22 ` Bug in gnus-group-read-ephemeral-group (Gnus v5.9.0) Kai Großjohann
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).