diff options
author | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:38:39 +0000 |
---|---|---|
committer | Jeffrey H. Kingston <jeff@it.usyd.edu.au> | 2010-09-14 20:38:39 +0000 |
commit | 68c155de3c3e83f53404288a318c5e29f0c4610f (patch) | |
tree | 3038e465a5cda497e52e93b4c5532b0dfa7d2c79 /include/dsf | |
parent | 78c2bcf9e96ab00615ee6f96905bca78fcd52a00 (diff) | |
download | lout-68c155de3c3e83f53404288a318c5e29f0c4610f.tar.gz |
Lout 3.28.
git-svn-id: http://svn.savannah.nongnu.org/svn/lout/trunk@25 9365b830-b601-4143-9ba8-b4a8e2c3339c
Diffstat (limited to 'include/dsf')
-rw-r--r-- | include/dsf | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/include/dsf b/include/dsf index 5e1ee73..18a3825 100644 --- a/include/dsf +++ b/include/dsf @@ -326,6 +326,11 @@ def @DocumentSetup named @IndexBSpacerFont { +3p } # font of index B spacer named @IndexBSpacerFormat right @Body { @Body } # format of index B spacer + named @MakeColophon { No } # make colophon? Yes or No + named @ColophonFont { } # font for colophon + named @ColophonBreak { } # break style for colophon + named @ColophonColumnNumber { 1 } # colophon columns (1 to 10) + named @ColophonColumnGap { 1.00c @OrIfPlain 6s } # colophon column gap named @TopGap { 0.75c @OrIfPlain 2f } # gap between figures named @MidGap { 0.75c @OrIfPlain 2f } # gap above/below body text @@ -1227,6 +1232,7 @@ def @DocumentSetup def @IndexPlace { @Galley } def @IndexAPlace { @Galley } def @IndexBPlace { @Galley } + def @ColophonPlace { @Galley } def @AfterLinePlace { @ForceGalley } def @TryAfterLinePlace right x @@ -1434,6 +1440,11 @@ def @DocumentSetup { @HExpand num @ColsOf gap { @IndexBColumnGap } @EqualWidth @VExpand @IndexBPlace } + + def @ColophonColList right num + { + @HExpand num @ColsOf gap { @ColophonColumnGap } @EqualWidth @VExpand @ColophonPlace + } ########################################################################### @@ -1567,6 +1578,7 @@ def @DocumentSetup @IndexAColList @IndexAColumnNumber @IndexBColList @IndexBColumnNumber @IndexColList @IndexColumnNumber + @ColophonColList @ColophonColumnNumber } } @@ -1579,6 +1591,7 @@ def @DocumentSetup @IndexAColList @IndexAColumnNumber @IndexBColList @IndexBColumnNumber @IndexColList @IndexColumnNumber + @ColophonColList @ColophonColumnNumber } } @@ -4707,6 +4720,23 @@ def @DocumentSetup ########################################################################### # # + # Colophon. # + # # + ########################################################################### + + def @ColophonList { @Galley //1vx @ColophonList } + + def @ColophonSection into { @ColophonPlace&&following } + right etc + { + // @ColophonBreak @Break @ColophonFont @Font @ColophonList + // etc + //1rt + } + + + ########################################################################### + # # # @LargeScaleStructure # # # # The prototype for the value of each large-scale structure symbol # |