lost part header et al (was: last questions)

[Hraban <angerweit@gmx.net>]

> > - after redefining my complex part start pages, there's no part entry
> > in my headers any more. (The old version used standardmakeup. I changed
> > it to \page[right] etc.) Should I mail my whole definition?
> Yes please.

Thank you for your patience! If you find something other
that I could improve, please tell me! (I wrote some more 
questions between)

---
%interface=en response=de tex=pdfetex output=pdf language=de
%
\mainlanguage		[deo] % hyphenation patterns seem to be de-new! why?
\useencoding		[fde]
\definepapersize	[UBuch][width=14cm,height=21cm]
\setuppapersize	[UBuch][UBuch]

\setuplayout		[width=11cm,height=17cm,
				header=14pt,headerdistance=10pt,
				footer=14pt,footerdistance=10pt, backspace=10mm,
				grid=yes, marking=off, location=center]
\setuppagenumbering[alternative=doublesided,
				way=bytext, sectionnumber=no, partnumber=no]

\def\SeiteInhalt{
\setuppagenumbering	[location={footer,marginedge}]
%
% the chapter thing works, part is empty!
\setupheadertexts	[][{\let\unknown\relax\getmarking[chapter]}][part][]
\setupbackgrounds	[header][text][frame=off,bottomframe=on] 
\setupbackgrounds	[rightpage][background=]
}

\def\SeiteOhne{
\setupbackgrounds	[rightpage][background=]
\setupbackgrounds	[header][text][bottomframe=off]
\setuppagenumbering	[location={}]
}

% Hintergrundbild f"ur Part
\useexternalfigure[hintergrund][part][width=15cm]
\defineoverlay[titelbild][{\externalfigure[hintergrund]}]

\def\SeitePart{
\setuppagenumbering	[location={}]
\page			[right]
\setupbackgrounds	[rightpage][background=titelbild]
\setupbackgrounds	[header][text][bottomframe=off]
} % wird in kap0-0-titelei verwendet

\setupbodyfont	[ber,ppl,10pt]
\setupbodyfontenvironment[default][em=italic]	% slanted is ugly!

\setupindenting 	[12pt] % why not the same for itemize?
\setupnarrower	[left=12pt, right=0pt, before={\noindent}, after={}]

% conversion=set 3 causes strange errors!
\setupfootnotes	[way=bypage, rule=off]

% special part title

\def\UPart#1#2%
  {\tfd\it #1: #2}

\def\StartPart#1%
	{\bgroup
	\page[right]
	\setuppagenumbering[location={}]
	\setupbackgrounds[rightpage][background=titelbild]
	\setupbackgrounds	[header][text][bottomframe=off]
	\part{#1}
	\vfill
	\tfb\setupinterlinespace[big]}

\def\StopPart%
	{\par\vfill\vfill
	\page[right]
	\SeiteInhalt % see above
	\egroup
	\relax}

% HEADERS
\setupheads	[align=right,tolerance=verytolerant]
\setuphead	[part]
			[command=\UPart,
			style=\tfd\it,
			placehead=yes,
			number=yes, pagenumber=no]
\setuphead	[chapter]
			[style=\tfc\it, number=no, page=yes, align=right]
% page=yes doesn't work everywhere!!
\setuphead	[title]
			[style=\tfc\it, page=yes, placehead=yes, 
			align=right, after={\blank}]
\setuphead	[subject]
			[style=\tfb\it, align=right] 
\setuphead	[subsubject]
			[style=\tfa\it, align=right, before={\blank}, after={}]

% special headers for one chapter
\def\subtitel#1#2{\subject{\NurLang{\tfx\it#1\crlf}#2}}

% TABLE OF CONTENTS
\definelist	[part]
\setuplist	[part]
			[style={\bf\it}, partnumber=no, before={\blank}]
\definelist	[chapter]
\setuplist	[chapter]
			[alternative=b, partnumber=no, interaction=pagenumber]
\definecombinedlist[inhalt]
			[part,chapter]
			[level=chapter, placehead=yes, criterium=all,
			interaction=pagenumber,
			style=\tfc\it, alternative=b]

% for parts of titles that shouldn't appear in lists and page headers
\def\NurLang#1{\nomarking{\nolist{#1}}}
\def\NLLF{\NurLang{\crlf}}

% F"ur die einfachen F"alle: Wort gleichzeitig in Text und Index
\def\Tindex#1{\index{#1} #1}

\setupfloats	[width=11cm] % seems to have no effect?
\setupcaptions[number=no, align=right] % dito
\setuptables	[width=11cm, bodyfont=small, before=\nohyphen, after={}]
\setupregister[index]
			[partnumber=no,criterium=all,
			balance=yes, style=\tfa\cap] % style undocumented, but works

% ENVIRONMENTS
\definestartstop
	[anmerkung]
	[before={\startlinecorrection\vbox\bgroup
	\switchtobodyfont[small]\setupinterlinespace[small]\noindent},
	after={\egroup\stoplinecorrection\relax}]
\definestartstop
	[verse]
	[before={\blank\setuplines[indenting=always]
	\startalignment[right]\startlines\startnarrower},
	after={\stopnarrower\stoplines\stopalignment\blank}]
\definestartstop
	[autor]
	[before={\startalignment[left]\it\noindent},
	after={\stopalignment}]
\def\Autor#1#2{\page[no]\startautor \index{#2}#1\stopautor\relax}

\unprotect % richtige Anf"uhrungszeichen
\definesymbol
	[beginquotation]
	[\getvalue{\??la\currentlanguage\c!leftquotation}]
\definesymbol
	[endquotation]
	[\getvalue{\??la\currentlanguage\c!rightquotation}]	
\protect

\definestartstop % like start/stopquotation
	[zitat]	
	[before={\startnarrower\noindent\symbol[beginquotation]},
	after={\symbol[endquotation]\stopnarrower}]

\def\StartZitat{\par\startnarrower\noindent\symbol[beginquotation]}
\def\StopZitat#1{\symbol[endquotation]\footnote{#1}\stopnarrower\par}

% FIGURES
\def\ZweiSym#1#2#3#4% not enough space over figures!
  {\par\vfill\blank\placefigure[][sym:#1-#3]{none}
     {\setupcombinations[width=11cm]
      \startcombination[2]
          {\hbox to 4.75 cm{\hss\externalfigure[sym-#1]\hss}} {#2}
          {\hbox to 4.75 cm{\hss\externalfigure[sym-#3]\hss}} {#4}
      \stopcombination}
  }

%\clubpenalty=8500 % keine Schusterjungen
%\widowpenalty=9000 % keine Hurenkinder
%\appendtoks \widowpenalty=0 \clubpenalty=0 \to \everytabulate
%\tolerance=1800 % --> setuptolerance
%\emergencystretch=12 pt % --> setuptolerance
\setuptolerance[horizontal, verytolerant] %, stretch ?
\setuptolerance[vertical, verystrict]
% no ideal settings found yet...

%%%%%%%%%%%%%%%% 
\starttext
%%%%%%%%%%%%%%%%
\startbodymatter
\SeiteOhne    
\input kap0-1-titelei

\page[right]
\SeiteInhalt
\input kap0-2-vorwort

\StartPart{Warum glauben wir?}
Ein neuer Religionsbegriff
\StopPart
\input kap1-1-religionsbegriff
\relax

% some more parts with chapters

\def\UPart#1#2{\tfd\it #2}
\setuphead	[part]
		[command=\UPart, style=\tfd\it,
		placehead=yes,frame=off]%,
%		number=no]
\StartPart{Anhang} % appendix has no subtitle & mustn't be numbered!
\StopPart
\switchtobodyfont[8pt]
\input anh1-organisation
% etc.
\relax\page % is additionally needed at some places. why?
\input anh7-making
\relax
\chapter[register]{Personen- und Sachregister}
\placeindex

\stopbodymatter
\stoptext

---
Thank you very much!

Grüßlis vom Hraban!