* ly/declarations-init.ly (paper): Define page-breaking.

[lilypond.git] / input / test / title-markup.ly

diff --git a/input/test/title-markup.ly b/input/test/title-markup.ly
index f22d13f10c5904c1278383a767e3398242e8fef0..ea38f9e9b15956842cf5261b5ee57ec2598ceb08 100644 (file)
--- a/input/test/title-markup.ly
+++ b/input/test/title-markup.ly
@@ -1,14 +1,16 @@
 \version "2.1.30"
 %{
-   \markup in titles is WIP.
-
-   only available in direct PostScript output:
+   Experimental markup titles are available in direct PostScript output:
 
    export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
    lilypond-bin -fps input/title/title-markup.ly
 
 %}
 
+\paper{
+       #(define page-breaking ly:optimal-page-breaks)
+}
+
 latinTest = \markup { \latin-i "Hellö" }
     
 sizeTest = \markup {
@@ -35,10 +37,10 @@ sizeTest = \markup {
 
 spaceTest = \markup { "two space chars" }
 \header {
-    texidoc = "Make titles using markup (WIP)."
+    texidoc = "Make titles using markup.  Only in direct PostScript output."
 
-    tagline = "my tagline for v \version"
-    copyright = "copyright by me"
+    ##tagline = "my tagline for v \version"
+    copyright = "Copyright by /me"
     
     %dedication = "För my dør Lily"
     % ugh: encoding char-size
@@ -56,60 +58,31 @@ spaceTest = \markup { "two space chars" }
     meter = "Meter (huh?)"
     arranger = "Arranger"
     instrument = "Instrument"
-    piece = "piece"
-
-    %% this overrides automatic book title
-    xxbookTitle = \markup {
-       \column <
-           %\fill-line #linewidth < \huge \bigger \bold \title >
-            \override #'(baseline-skip . 4) \column <
-               \fill-line < \latin-i \dedication >
-               \fill-line < \huge\bigger\bigger\bigger\bigger \bold \title >
-                \override #'(baseline-skip . 3) \column <
-                    \fill-line < \large\bigger\bigger \bold \subtitle >
-                    \fill-line < \bigger\bigger \bold \subsubtitle >
-                >
-                \override #'(baseline-skip . 5) \column <
-                " "
-                >
-                \override #'(baseline-skip . 2.5) \column <
-                   \fill-line < \bigger \poet
-                                 \large\bigger \caps \composer >
-                   \fill-line < \bigger \texttranslator
-                                \bigger \opus >
-                   \fill-line < \bigger \meter
-                                \bigger \arranger >
-                    " "
-                   \fill-line < \large\bigger \instrument >
-                    " "
-                   \fill-line < \large\bigger \caps \piece  " ">
-                >
-            >
-        >    
-    }
+    piece = "Piece"
 
-%{
-     foe = \sizeTest
-     baar = \spaceTest
-%}
+    %% Override automatic book title
+    %% bookTitle = \markup { \fill-line < \huge\bold \title > > }
 }
 
 \score {
     \context Staff \notes \relative c' {
        c2-\sizeTest c2-\spaceTest
     }
+    \paper {
+%      #(paper-set-staff-size (* 11.0 pt)) 
+       }
 }
 
 \header {
-    %% override automatic score title
-    xxscoreTitle = \markup { "Tweetje" }
+    %% Override automatic score title
+    %% scoreTitle = \markup { "Tweetje" }
     opus = "opus 1"
     piece = "Second"
 }
 
 \score {
     \context Staff \notes \relative c' {
-       \repeat unfold 30 { a b c d \break }
+       \repeat unfold 135 { a b c d \break }
        c1
     }
 }