X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Ftitle-markup.ly;h=5cca51435df6e1adab85571ddba635d9bade74ce;hb=5e0c1ca14e672b864f9c00d1f856177c871e6488;hp=5caa3076dc73dc793b316e7ef7c0250a8e2528cc;hpb=381c8bd3798bc6e43596ecfb00feb5cda9396cf0;p=lilypond.git

diff --git a/input/test/title-markup.ly b/input/test/title-markup.ly
index 5caa3076dc..5cca51435d 100644
--- a/input/test/title-markup.ly
+++ b/input/test/title-markup.ly
@@ -1,14 +1,35 @@
-\version "2.1.30"
+\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,30 +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: keep on 3 pages
-	%% 35 looks very good: 3 pages
-	%% Hmmm.
-	%% 36 seems to show a bug:
-	%% 4 pages, first two half full, last two full
-	\repeat unfold 35 { a b c d \break }
-	c1
     }
 }