From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/9560
Path: main.gmane.org!not-for-mail
From: Giuseppe Bilotta <gip.bilotta@iol.it>
Newsgroups: gmane.comp.tex.context
Subject: Re: [NTG-context] Fully object-oriented section
Date: Thu, 17 Oct 2002 23:27:14 +0200
Sender: ntg-context-admin@ref.vet.uu.nl
Message-ID: <1494380849.20021017232714@iol.it>
References: <157877251.20021017222850@iol.it>
Reply-To: Giuseppe Bilotta <gip.bilotta@iol.it>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
X-Trace: main.gmane.org 1035399870 4051 80.91.224.250 (23 Oct 2002 19:04:30 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Wed, 23 Oct 2002 19:04:30 +0000 (UTC)
Cc: ntg-context@ntg.nl
Original-Received: from hermes.hrz.uni-giessen.de (hermes.hrz.uni-giessen.de [134.176.2.15])
	by osiris.hrz.uni-giessen.de (8.11.6+Sun/8.11.6) with ESMTP id g9HLSie15685
	for <g029@popg.uni-giessen.de>; Thu, 17 Oct 2002 23:28:44 +0200 (MEST)
Original-Received: from ref.vet.uu.nl by hermes.hrz.uni-giessen.de with ESMTP for Guenter.Partosch@hrz.uni-giessen.de; Thu, 17 Oct 2002 23:28:19 +0200
Original-Received: from ref.ntg.nl (localhost.localdomain [127.0.0.1])
	by ref.ntg.nl (Postfix) with ESMTP
	id 25E3910AE3; Thu, 17 Oct 2002 23:28:15 +0200 (MEST)
Original-Received: from smtp2.libero.it (smtp2.libero.it [193.70.192.52])
	by ref.ntg.nl (Postfix) with ESMTP id DCC5E10ADB
	for <ntg-context@ntg.nl>; Thu, 17 Oct 2002 23:27:58 +0200 (MEST)
Original-Received: from [151.29.131.50] (151.29.131.50) by smtp2.libero.it (6.5.028)
        id 3DA310EC0045D9E2; Thu, 17 Oct 2002 23:27:52 +0200
X-Mailer: The Bat! (v1.60q) Business
X-Priority: 3 (Normal)
Original-To: Giuseppe Bilotta <gip.bilotta@iol.it>
In-Reply-To: <157877251.20021017222850@iol.it>
Errors-To: ntg-context-admin@ref.vet.uu.nl
X-BeenThere: ntg-context@ref.ntg.nl
X-Mailman-Version: 2.0.13
Precedence: bulk
List-Help: <mailto:ntg-context-request@ref.ntg.nl?subject=help>
List-Post: <mailto:ntg-context@ref.ntg.nl>
List-Subscribe: <http://ref.ntg.nl/mailman/listinfo/ntg-context>,
	<mailto:ntg-context-request@ref.ntg.nl?subject=subscribe>
List-Id: mailing list for ConTeXt users <ntg-context.ref.ntg.nl>
List-Unsubscribe: <http://ref.ntg.nl/mailman/listinfo/ntg-context>,
	<mailto:ntg-context-request@ref.ntg.nl?subject=unsubscribe>
List-Archive: <http://ref.ntg.nl/pipermail/ntg-context/>
Xref: main.gmane.org gmane.comp.tex.context:9560
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:9560


Thursday, October 17, 2002 Giuseppe Bilotta wrote:

GB> %D New structured sectioning

GB> \newtoks\everybeforestartpart
GB> \newtoks\everyafterstartpart
GB> \newtoks\everystoppart
GB> \def\startpart{\dosingleempty\dostartpart}
GB> \def\dostartpart[#1]#2{%
GB>   \bgroup\bgroup
GB>     \the\everybeforestartpart
GB>     \iffirstargument
GB>        \part[#1]{#2}%
GB>     \else
GB>        \part{#2}%
GB>     \fi
GB>   \egroup
GB>   \the\everyafterstartpart
GB> }
GB> \def\stoppart{\the\everystoppart\egroup}

Sorry for following up to myself. After a few tries, I discovered
that it's much better without the inner grouping:

\newtoks\everybeforestartpart
\newtoks\everyafterstartpart
\newtoks\everystoppart
\def\startpart{\dosingleempty\dostartpart}
\def\dostartpart[#1]#2{%
  \bgroup
    \the\everybeforestartpart
    \iffirstargument
       \part[#1]{#2}%
    \else
       \part{#2}%
    \fi
  \egroup
  \the\everyafterstartpart
}
\def\stoppart{\the\everystoppart}

-- 
Giuseppe "Oblomov" Bilotta

_______________________________________________
ntg-context mailing list
ntg-context@ref.ntg.nl
http://ref.ntg.nl/mailman/listinfo/ntg-context