*** empty log message ***

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

diff --git a/input/test/title-markup.ly b/input/test/title-markup.ly
index 4ce2898c9c7a08ac9e31b8cc817fb1c44f469826..5cca51435df6e1adab85571ddba635d9bade74ce 100644 (file)
--- a/input/test/title-markup.ly
+++ b/input/test/title-markup.ly
@@ -1,14 +1,35 @@
-\version "2.2.0"
+\version "2.3.8"
+
 %{
-   Experimental markup titles are available in direct PostScript output:
+   Markup titles also available for direct PostScript output:
 
    export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
    lilypond-bin -fps input/title/title-markup.ly
 
+  PostScript fonts: WIP.
+
+  * Nonstandardised install directory / how to locate a ps font?
+  * Nonstandardised filenames?
+
+
+For century schoolbook font:
+
+  Debian:
+    cp -pv /usr/share/fonts/type1/gsfonts/c*.{afm,pfb} mf/out
+
+  Red Hat (untested):
+
+    cp -pv /usr/share/fonts/afms/adobe/c*.{afm,pfb} mf/out/
+
+    cp -pv /usr/share/fonts/default/Type1/c*.{pfb,afm} mf/out
+
 %}
 
 \paper{
     #(define page-breaking ly:optimal-page-breaks)
+    %% Ughr, this breaks TeX output...
+    %% fonts = #(make-century-schoolbook-tree 1.0)
+    inputencoding = #"latin1"
 }
 
 latinTest = \markup { \latin-i "Hellö" }
@@ -64,28 +85,40 @@ spaceTest = \markup { "two space chars" }
     %% bookTitle = \markup { \fill-line < \huge\bold \title > > }
 }
 
-\score {
-    \context Staff \notes \relative c' {
-       c2-\sizeTest c2-\spaceTest
+%% suggest harder :-)
+%% noPagebreak = #(make-event-chord (list (make-penalty-music 0 1e9)))
+
+\book {
+    
+    \score {
+       \context Staff  \relative c' {
+           c2-\sizeTest c2-\spaceTest
+       }
+       \paper {
+           #(paper-set-staff-size (* 11.0 pt)) 
+       }
     }
-    \paper {
-%      #(paper-set-staff-size (* 11.0 pt)) 
+    
+    \score {
+       \context Staff  \relative c' {
+           %% stress page breaking:
+           %% 35 keep on 3 pages
+           %% 36 spread evenly over 4 pages
+           \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 {
+           %% Override automatic score title
+           %% scoreTitle = \markup { "Tweetje" }
+           opus = "opus 1"
+           piece = "Second"
+       }
+       \paper {
        }
-}
-
-\header {
-    %% Override automatic score title
-    %% scoreTitle = \markup { "Tweetje" }
-    opus = "opus 1"
-    piece = "Second"
-}
-
-\score {
-    \context Staff \notes \relative c' {
-       %% stress page breaking:
-       %% 35 keep on 3 pages
-       %% 36 spread evenly over 4 pages
-       \repeat unfold 36 { a b c d \break }
-       c1
     }
 }