From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/60024
Path: news.gmane.org!not-for-mail
From: sigurd@12move.de (Karl =?iso-8859-1?Q?Pfl=E4sterer?=)
Newsgroups: gmane.emacs.gnus.general
Subject: Re: Gnus-FAQ: xml to texi with Scheme prog
Date: Mon, 21 Mar 2005 23:32:37 +0100
Organization: Lemis World
Message-ID: <uk6o0d4xy.fsf@hamster.pflaesterer.de>
References: <u4qfkliso.fsf@hamster.pflaesterer.de>
	<v9br9k7p11.fsf@marauder.physik.uni-ulm.de>
	<usm2wzpe0.fsf@hamster.pflaesterer.de>
	<v9wts2853m.fsf@marauder.physik.uni-ulm.de>
	<fc339e4a05032013554516e292@mail.gmail.com>
	<v97jk0kfpf.fsf@marauder.physik.uni-ulm.de>
Reply-To: khp@pflaesterer.de (Karl =?iso-8859-1?Q?Pfl=E4sterer?=)
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: sea.gmane.org 1111444527 3535 80.91.229.2 (21 Mar 2005 22:35:27 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Mon, 21 Mar 2005 22:35:27 +0000 (UTC)
Original-X-From: ding-owner+M8565@lists.math.uh.edu Mon Mar 21 23:35:27 2005
Original-Received: from malifon.math.uh.edu ([129.7.128.13] ident=mail)
	by ciao.gmane.org with esmtp (Exim 4.43)
	id 1DDVUX-0008Dj-Dy
	for ding-account@gmane.org; Mon, 21 Mar 2005 23:35:22 +0100
Original-Received: from localhost
	([127.0.0.1] helo=lists.math.uh.edu ident=lists)
	by malifon.math.uh.edu with smtp (Exim 3.20 #1)
	id 1DDVVe-0000VQ-00; Mon, 21 Mar 2005 16:36:30 -0600
Original-Received: from util2.math.uh.edu ([129.7.128.23])
	by malifon.math.uh.edu with esmtp (Exim 3.20 #1)
	id 1DDVVW-0000VK-00
	for ding@lists.math.uh.edu; Mon, 21 Mar 2005 16:36:22 -0600
Original-Received: from quimby.gnus.org ([80.91.224.244])
	by util2.math.uh.edu with esmtp (Exim 4.30)
	id 1DDVVU-0000DR-MH
	for ding@lists.math.uh.edu; Mon, 21 Mar 2005 16:36:20 -0600
Original-Received: from news by quimby.gnus.org with local (Exim 3.35 #1 (Debian))
	id 1DDVVT-0000ID-00
	for <ding@gnus.org>; Mon, 21 Mar 2005 23:36:19 +0100
Original-To: ding@gnus.org
Original-Path: wintendo.pflaesterer.de!not-for-mail
Original-Newsgroups: gnus.ding
Original-Lines: 49
Original-NNTP-Posting-Host: b819a.b.pppool.de
Original-X-Trace: quimby.gnus.org 1111444579 1126 213.7.129.154 (21 Mar 2005 22:36:19 GMT)
Original-X-Complaints-To: usenet@quimby.gnus.org
Original-NNTP-Posting-Date: Mon, 21 Mar 2005 22:36:19 +0000 (UTC)
Mail-Copies-To: never
User-Agent: Gnus/5.110003 (No Gnus v0.3) Hamster/2.0.6.0
Cancel-Lock: sha1:8sjrP1q5pFlTH245otbM6ZUgxxI=
X-Spam-Score: -4.9 (----)
Precedence: bulk
Original-Sender: ding-owner@lists.math.uh.edu
X-MailScanner-From: ding-owner+m8565@lists.math.uh.edu
X-MailScanner-To: ding-account@gmane.org
Xref: news.gmane.org gmane.emacs.gnus.general:60024
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:60024

On 21 Mrz 2005, reinersteib+gmane@imap.cc wrote:


>   (insert "@ignore\n   arch-" "tag: "
> 	  "64dc5692-edb4-4848-a965-7aa0181acbb8"
>           "\n@end ignore")
>
> ... to `main' in `xml2texi.scm'?

You could simply rewrite the rule for the article.

At the moment it is:

               (article . ,(lambda (tag . sects)
                             (cons (boilerplate up1) sects)))

it could be:

               (article . ,(lambda (tag . sects)
                             (list (boilerplate up1) sects
                                    (format "\
~%@c @bye~%\
@ignore~%\
arch-\
tag: 64dc5692-edb4-4848-a965-7aa0181acbb8~%\
@end ignore~%"))))

Clearly what is written as format ... should be defined as variable and
simply included there.

Like e.g.

(define +this-is-the-end-my-friend+
    (format "\
@c @bye~%\
@ignore~%\
arch-\
tag: 64dc5692-edb4-4848-a965-7aa0181acbb8~%\
@end ignore"))

               (article . ,(lambda (tag . sects)
                             (list (boilerplate up1) sects 
                                   +this-is-the-end-my-friend+)))


Or something similar.


   KP