X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Ffill-a4.ly;h=937e2a12b5f812209f2c3cade71c6d4cb20c39e0;hb=833d34025e532630f273076f7eb47c399d90f396;hp=ff82211fb2946acca79fc86362e25404c0154d9c;hpb=5b4fa0596c3c3ec3f68d03ac0666ae411cf4d4e6;p=lilypond.git

diff --git a/input/test/fill-a4.ly b/input/test/fill-a4.ly
index ff82211fb2..937e2a12b5 100644
--- a/input/test/fill-a4.ly
+++ b/input/test/fill-a4.ly
@@ -1,24 +1,31 @@
-%
+\version "2.1.11"
+%possible rename to paper-fill-a4.ly -gp
+% candidate for reg -gp
+% Han says no, but keeping this comment temporarily so that I don't
+% forget and nominate it for reg again.  :)  -gp
+
 % test file to get a4 paper really filled,
 % without having to resort to the ever-ugly oversizing hack:
 %
 %   `textheight = 310.0\mm'
 %
-% process this file with ly2dvi, and make sure footskip/headsep are set
+% process this file with lilypond, and make sure footskip/headsep are set
 % at a reasonably (small) value.  -- jcn
 %
-\header{
-tagline="Ligly";
+\header{ texidoc="@cindex Paper a4 Fill
+This should fill a4 paper. "
 }
-\include "paper13.ly";
+
+#(set-staff-size 13)
+
 \score{
 	\context Voice \notes\relative c'{
-		\clef alto;
+		\clef alto
 		\repeat "unfold" 36 c1
 	}
 	\paper{
-		\paper_thirteen
-		indent = 0.0\mm;
+		\paperThirteen
+		indent = 0.0\mm
 		% URG
 		% Vertical space is rather precious when typesetting
 		% music.  But we can only set textheight here, and must
@@ -26,12 +33,13 @@ tagline="Ligly";
 		% footers.  If we want a header or footer on some page,
 		% all other pages suffer shortened `textheight'.
 		% Try the maximum for a4, without loosing footers:
-		textheight = 297.0\mm - 7.0\mm;
-		papersize = "a4";
-		linewidth = 15.0\mm;
+		textheight = 297.0\mm - 7.0\mm
+		papersize = "a4"
+		linewidth = 15.0\mm
 		\translator {
 			\StaffContext
-			StaffMinimumVerticalExtent = #(cons 0 0)
+			minimumVerticalExtent = #(cons 0 0)
 		}
 	}
 }
+