]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/title-markup.ly
*** empty log message ***
[lilypond.git] / input / test / title-markup.ly
index bc0641e5f73870ee723ee4f5b4fd81d8d25e1373..5cca51435df6e1adab85571ddba635d9bade74ce 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.2.0"
+\version "2.3.8"
 
 %{
    Markup titles also available for direct PostScript output:
@@ -85,23 +85,31 @@ spaceTest = \markup { "two space chars" }
     %% bookTitle = \markup { \fill-line < \huge\bold \title > > }
 }
 
+%% suggest harder :-)
+%% noPagebreak = #(make-event-chord (list (make-penalty-music 0 1e9)))
+
 \book {
     
     \score {
-       \context Staff \notes \relative c' {
+       \context Staff  \relative c' {
            c2-\sizeTest c2-\spaceTest
        }
        \paper {
-           %% #(paper-set-staff-size (* 11.0 pt)) 
+           #(paper-set-staff-size (* 11.0 pt)) 
        }
     }
     
     \score {
-       \context Staff \notes \relative c' {
+       \context Staff  \relative c' {
            %% stress page breaking:
            %% 35 keep on 3 pages
            %% 36 spread evenly over 4 pages
-           \repeat unfold 36 { a b c d \break }
+           \repeat unfold 6 { a b c d \break }
+           
+           %% FIXME: TODO factor \pagebreak \noPagebreak into regtest
+           %% Without this, page breaks are better, after measure: 12
+           \noPagebreak
+           \repeat unfold 30 { a b c d \break }
            c1
        }
        \header {
@@ -113,4 +121,4 @@ spaceTest = \markup { "two space chars" }
        \paper {
        }
     }
-}
\ No newline at end of file
+}