From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/11029
Path: main.gmane.org!not-for-mail
From: Guy Worthington <guyw@multiline.com.au>
Newsgroups: gmane.comp.tex.context
Subject: Re: Inserting a mini toc into the chapter heading
Date: 14 Feb 2003 21:10:13 +0800
Sender: ntg-context-admin@ntg.nl
Message-ID: <ud6lvc8ju.fsf@multiline.com.au>
References: <ufzqv6yl2.fsf_-_@multiline.com.au> <5.1.0.14.1.20030211130603.03527c58@server-1> <uisvprixv.fsf@multiline.com.au> <5.1.0.14.1.20030213175042.0276a5d8@server-1> <u8ywjcc68.fsf@multiline.com.au>
Reply-To: ntg-context@ntg.nl
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-Trace: main.gmane.org 1045228182 3343 80.91.224.249 (14 Feb 2003 13:09:42 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Fri, 14 Feb 2003 13:09:42 +0000 (UTC)
Return-path: <ntg-context-admin@ntg.nl>
Original-Received: from ref.vet.uu.nl ([131.211.172.13] helo=ref.ntg.nl)
	by main.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 18jfaQ-0000q4-00
	for <gctc-ntg-context-518@gmane.org>; Fri, 14 Feb 2003 14:09:03 +0100
Original-Received: from ref.ntg.nl (localhost.localdomain [127.0.0.1])
	by ref.ntg.nl (Postfix) with ESMTP
	id 8406510AF0; Fri, 14 Feb 2003 14:11:19 +0100 (MET)
Original-Received: from main.gmane.org (main.gmane.org [80.91.224.249])
	by ref.ntg.nl (Postfix) with ESMTP id 2B8D110AE9
	for <ntg-context@ref.ntg.nl>; Fri, 14 Feb 2003 14:09:01 +0100 (MET)
Original-Received: from list by main.gmane.org with local (Exim 3.35 #1 (Debian))
	id 18jfUb-0000Ut-00
	for <ntg-context@ref.ntg.nl>; Fri, 14 Feb 2003 14:03:01 +0100
X-Injected-Via-Gmane: http://gmane.org/
Original-To: ntg-context@ref.ntg.nl
Original-Received: from news by main.gmane.org with local (Exim 3.35 #1 (Debian))
	id 18jfSo-0000P2-00
	for <gmane-comp-tex-context@m.gmane.org>; Fri, 14 Feb 2003 14:01:10 +0100
Original-Lines: 58
Original-X-Complaints-To: usenet@main.gmane.org
User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.2
Errors-To: ntg-context-admin@ntg.nl
X-BeenThere: ntg-context@ntg.nl
X-Mailman-Version: 2.0.13
Precedence: bulk
List-Help: <mailto:ntg-context-request@ntg.nl?subject=help>
List-Post: <mailto:ntg-context@ntg.nl>
List-Subscribe: <http://www.ntg.nl/mailman/listinfo/ntg-context>,
	<mailto:ntg-context-request@ntg.nl?subject=subscribe>
List-Id: mailing list for ConTeXt users <ntg-context.ntg.nl>
List-Unsubscribe: <http://www.ntg.nl/mailman/listinfo/ntg-context>,
	<mailto:ntg-context-request@ntg.nl?subject=unsubscribe>
List-Archive: <http://www.ntg.nl/pipermail/ntg-context/>
Xref: main.gmane.org gmane.comp.tex.context:11029
X-Report-Spam: http://spam.gmane.org/gmane.comp.tex.context:11029

For all you propeller-heads that like to see bad code here's my
chapter heading setup:

--------------------------------------------------

%output=pdf

%% chapter head layout
\setupcolors[state=start]
\setuplist[section]
          [style=boldslanted,
	   align=right,
	   interaction=all,
	   symbol=1, 
	   width=0.5em,
	   pagenumber=no,
	   before=,
	   after=]                 
\setuphead[chapter]
          [header=empty,
	   numberstyle=ChapterTitleNumberFont,
	   textstyle=ChapterTitleTextFont
	   alternative=command,
	   command=\ContentsHead, 
	   page=right,
	   after={\blank[2*big]}]
\definefont[ChapterTitleTextFont][Serif at 24.9pt]
\definefont[ChapterTitleNumberFont][SerifBold at 40pt]
\def\ContentsHead#1#2%
  {\setupframed[frame=off]
   \framed[width=\hsize,offset=overlay]
     {\placesidebyside
        {\doifelsenothing{#1}
           {\framed [width=.6\hsize]{}} % dummy               
           {\framed [width=.6\hsize,offset=1em,strut=no,align=right,
	             background=screen] 
              {\vi In this chapter: \blank
                 \placelist[section][criterium=chapter]}}}
        {\framed [width=.4\hsize,strut=no,align=left]
		    %% Typeset Chapter Number
		    {\hbox{\vbox to 24.9pt{% height ChapterTitleTextFont 
		          \vss
			  #1}}}
           \vfilll}
     }%
   %% Typeset Chapter Title
   \llap{\lower24.9pt\hbox{#2\hskip0.5em}}}

\showmakeup

\starttext 
\chapter {Berend} 
\section {Botje} 
\section {Botje} 
\section {Botje} 
\stoptext

--------------------------------------------------