Re: Getting a List of Sections at Start of Chapters

[Mark Summerfield]

Using @List gives a much nicer definition, and works better when section
titles are too wide to fit on one line.


import @BookSetup 
def @ChapTop
    named one{}
    named two{}
    named three{}
    named four{}
    named five{}
    named six{}
    named address@hidden a71}
    right tag
{
    @Place x{1.125i}y{top - 0.5i - ysize}
        {{Bold address@hidden @NumberOf{tag}}
    @Place
        x{3.75i}
        y{top - 0.5i - ysize}
    2.75i @Wide {
        @List
            style{bullet}
            labelwidth{1.5f}
            break{nohyphen ragged}
            gap{1vx}
        one @Case {
            {}   @Yield @Null
            else @Yield address@hidden@TitleOf{one}}}
        }
        two @Case {
            {}   @Yield @Null
            else @Yield address@hidden@TitleOf{two}}}
        }
        three @Case {
            {}   @Yield @Null
            else @Yield address@hidden@TitleOf{three}}}
        }
        four @Case {
            {}   @Yield @Null
            else @Yield address@hidden@TitleOf{four}}}
        }
        five @Case {
            {}   @Yield @Null
            else @Yield address@hidden@TitleOf{five}}}
        }
        six @Case {
            {}   @Yield @Null
            else @Yield address@hidden@TitleOf{six}}}
        }
        @EndList
    }
}

-- 
Mark Summerfield, Qtrac Ltd., www.qtrac.eu