]> git.donarmstrong.com Git - lilypond.git/commitdiff
*** empty log message ***
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 28 May 2004 22:50:56 +0000 (22:50 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Fri, 28 May 2004 22:50:56 +0000 (22:50 +0000)
input/regression/key-clefs.ly
input/test/coriolan-margin.ly
input/test/count-systems.ly
input/test/fill-a4.ly [deleted file]

index ab0f77f72664bd766f2fee8ceadc32bf632e3e10..556a26ffa93432982e70783c89e39fa237d493b1 100644 (file)
@@ -2,6 +2,8 @@
 \version "2.2.0"
 \header { texidoc = "Each clef have own accidental placing rules. " }
 
+#(set-global-staff-size 16)
+
 \score { \notes
   \relative cis' {
 
@@ -22,7 +24,5 @@
 \key cis \major cis \key ces \major  ces
 }
 
-       \paper{\paperSixteen}
-
 }
 
index 0bdf91ab4b52e9b0d6de190a43f45d8f6b10df29..26b302fb1a361929462724112e3d30e8f9b9671d 100644 (file)
@@ -101,6 +101,7 @@ violoncello = \notes \relative c' {
 }
 
 
+#(set-global-staff-size 16)
 \score {
   << 
     \context StaffGroup ="legni" << 
@@ -131,7 +132,6 @@ violoncello = \notes \relative c' {
     >>
   >>
   \paper {
-      \paperSixteen
       indent=100.0\mm
       linewidth=150.0\mm
       \context {
index 3ef48705ad113c90d1ecd15c97791d85a8329fcf..f96be2491ea9de65e21518649db844df9c1fd57a 100644 (file)
@@ -19,14 +19,16 @@ to the number of systems or the system number of a grob.
 %% If we're not using 6 systems, there's definately a problem.
 %% #(define (assert-system-count smob n) ...
 
-
 #(define (display-systemno smob)
   (let* ((this-system (ly:grob-system smob))
         (systems (ly:spanner-broken-into
                   (ly:grob-original this-system))))
-    (display smob)
-    (display (list-index systems this-system))
-    (newline)))
+   (display smob)
+   (display systems)
+   (display this-system)
+   
+   (display (list-index systems this-system))
+   (newline)))
   
 
 #(define (display-system-count smob)
@@ -40,8 +42,8 @@ to the number of systems or the system number of a grob.
 \score{
     \notes\relative c''{
        \override NoteHead  #'after-line-breaking-callback
-       % = #display-system-count
-       = #display-systemno
+        = #display-system-count
+%      = #display-systemno
        c1
        d
     }
diff --git a/input/test/fill-a4.ly b/input/test/fill-a4.ly
deleted file mode 100644 (file)
index 70e72fb..0000000
+++ /dev/null
@@ -1,45 +0,0 @@
-\version "2.3.2"
-%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 lilypond, and make sure footskip/headsep are set
-% at a reasonably (small) value.  -- jcn
-%
-\header{ texidoc="@cindex Paper a4 Fill
-This should fill a4 paper. "
-}
-
-#(set-global-staff-size 13)
-
-\score{
-       \context Voice \notes\relative c'{
-               \clef alto
-               \repeat "unfold" 36 c1
-       }
-       \paper{
-               \paperThirteen
-               indent = 0.0\mm
-               % URG
-               % Vertical space is rather precious when typesetting
-               % music.  But we can only set textheight here, and must
-               % guess and subtract the height needed for headers and 
-               % 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
-               \context {
-                       \Staff
-                       minimumVerticalExtent = #(cons 0 0)
-               }
-       }
-}
-