Hi, Aditya—

This works perfectly (after changing the Yen-signs for backslashes).  
It behaves as expected when adapted and will be a great help in  
producing a number of the TOCs that are on my horizon. Many thanks  
for your time and help!

All best, Alan

> On Oct 1, 2007, at 8:11 PM, Aditya Mahajan wrote:
>
>> Hi Alan,
>> On Mon, 1 Oct 2007, Alan Bowen wrote:
>>> 1. History
>>>     1.1 Pre-Greek (Babylonian and Egyptian) sundials
>>>     1.2 Greek and Roman sundials
>>>     1.3 Byzantine sundials
>>> is the goal. Sadly, adding “serried” destroys the indentation of the
>>> subitems.
>> I could not find a clean way to do this. So, I redefined
>> ¥checkforrepeatedlistitem. Hans, isn't there a clean way to do this?
>> ¥setupitemize[1][fit,broad]
>> ¥setupitemize[2][width=2em]
>> ¥setupitemize[each][n]
>> ¥def¥checkforrepeatedlistitem
>>   {¥ifnum¥itemlevel=¥plusone
>>      ¥initializeboxstack{item}%
>>    ¥fi
>>    ¥ifconditional¥repeatlistitem
>>       ¥savebox{item}{¥itemlevel}{¥hbox{¥copy8}}%
>>       ¥setbox8¥hbox %to ¥wd8
>>        {¥setbox¥scratchbox¥hbox
>>           {¥scratchcounter¥itemlevel
>>            ¥advance¥scratchcounter¥minusone
>>            ¥dorecurse¥scratchcounter{¥foundbox{item} 
>> {¥recurselevel}}}%
>>         ¥ifnum¥itemlevel>¥plusone
>>           ¥ifdim¥wd¥scratchbox>¥zeropoint
>>            %¥hskip-¥dimen2
>>             ¥box¥scratchbox
>>           ¥fi
>>         ¥fi
>>         ¥box8 }%
>>    ¥fi}
>> ¥starttext
>> ¥startitemize[repeat]
>>   ¥item item 1
>>     ¥startitemize
>>       ¥item item 1.1
>>       ¥item item 1.2
>>       ¥item item 1.3
>>     ¥stopitemize
>>   ¥item item 2
>>     ¥startitemize
>>       ¥item item 2.1
>>       ¥item  item 2.2
>>       ¥item item 2.3
>>     ¥stopitemize
>>   ¥item item 3
>>     ¥startitemize
>>       ¥item  item 3.1
>>       ¥item  item 3.2
>>     ¥stopitemize
>> ¥stopitemize
>> ¥stoptext
>> Aditya

___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the 
Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : https://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Reply via email to