[PATCH] Add address@hidden' options for the title page of `slides'

[Ludovic Courtès]

Hi,

The attached patch adds address@hidden' options driving the layout of the
title page of `slides' documents.  The default layout remains unchanged.

Thanks,
Ludovic.

diff --git a/include/slides b/include/slides
index a6b0788..422fa61 100644
--- a/include/slides
+++ b/include/slides
@@ -358,6 +358,10 @@
   # @OverheadNumbers           { Arabic        } # kind of overhead numbers
   # @FirstOverheadNumber       { 1             } # first overhead num
   # @TitlePageFont             { Helvetica Base 1.5f   } # title page font
+  # @TitleFormat               { @Center clines @Break title } # title line
+  # @AuthorFormat              { @Center clines @Break author } # author line
+  # @InstitutionFormat         { @Center clines @Break @I institution } # 
institution
+  # @DateLineFormat            { @Center date          } # date line
   # @AboveTitleGap             { 0.5i                  } # gap above title
   # @AboveAuthorGap            { 1.0i                  } # gap above author
   # @AboveInstitutionGap       { 0.5i                  } # gap above inst
diff --git a/include/slidesf b/include/slidesf
index a870454..1ecb02c 100644
--- a/include/slidesf
+++ b/include/slidesf
@@ -21,6 +21,14 @@ def @OverheadSetup
     named @OverheadNumbers             { Arabic                }
     named @FirstOverheadNumber         { 1                     }
     named @TitlePageFont               { Helvetica Base        }
+    named @TitleFormat
+            left title                 { @Center clines @Break title }
+    named @AuthorFormat
+            left author                        { @Center clines @Break author }
+    named @InstitutionFormat
+            left institution           { @Center clines @Break @I institution }
+    named @DateLineFormat
+            left date                  { @Center date          }
     named @AboveTitleGap               { 0.5i                  }
     named @AboveAuthorGap              { 1.0i                  }
     named @AboveInstitutionGap         { 0.5i                  }
@@ -144,9 +152,9 @@ def @OverheadSetup
        def @DatePart
        {
            @DateLine @Case {
-               No      @Yield { @Null              }
-               Yes     @Yield { |0.5rt @Date     | }
-               else    @Yield { |0.5rt @DateLine | }
+               No      @Yield { @Null     }
+               Yes     @Yield { @Date     }
+               else    @Yield { @DateLine }
            }
        }
 
@@ -155,11 +163,12 @@ def @OverheadSetup
            @TitlePageFont @Font @InitialBreak @Break
            @InitialSpace @Space clines @Break {
                //0.5i
-               //@AboveTitleGap       |0.5rt 1.5f @Font @InitialBreak @Break
-                                  @InitialSpace @Space clines @Break @Title |
-               //@AboveAuthorGap      |0.5rt clines @Break @Author |
-               //@AboveInstitutionGap |0.5rt clines @Break @I @Institution |
-               //@AboveDateLineGap    @DatePart
+               //@AboveTitleGap   1.5f @Font @InitialBreak @Break
+                                  @InitialSpace @Space
+                                  @Title @TitleFormat |
+               //@AboveAuthorGap      @Author @AuthorFormat |
+               //@AboveInstitutionGap @Institution @InstitutionFormat |
+               //@AboveDateLineGap    @DatePart @DateLineFormat |
            }
        }