* input/regression/grid-lines.ly (skips): refine example.

[lilypond.git] / input / regression / grid-lines.ly

diff --git a/input/regression/grid-lines.ly b/input/regression/grid-lines.ly
index 05279d4b55c57ae68040cdd673d0a8ee612c3af1..e6b5a1dc4a28892c19759aa115bd3aff0db242a6 100644 (file)
--- a/input/regression/grid-lines.ly
+++ b/input/regression/grid-lines.ly
@@ -48,6 +48,9 @@ skips =
   }
 }
 
+\layout {
+  raggedright = ##t
+}
 \new Score 
 \with {
   \consists "Grid_line_span_engraver"
@@ -55,14 +58,30 @@ skips =
   \override TimeSignature #'transparent = ##t
 
   \override NoteColumn #'X-offset-callbacks = #(list (lambda (x a) -0.5))
-  \override NoteColumn #'Y-offset-callbacks = #(list (lambda (x a) 0.25))
+  \override NoteHead #'Y-offset-callbacks = #(list (lambda (x a) 0.75))
 
 }
 \new StaffGroup <<
-  \new Staff {
-    \repeat unfold 12 { c''8 }
+  \new RhythmicStaff \with
+  {
+    \override NoteHead  #'no-ledgers = ##t
+  }
+  {
+   \stemUp
+   c4. c8 c8 c c4 c8 c8.[ c16 c8]
+  }
+  \new RhythmicStaff
+  {
+    \override NoteHead #'transparent = ##t
+    \override NoteHead #'no-ledgers = ##t
+    \override Stem #'transparent = ##t
+    \override Beam #'transparent = ##t
+    << \skips
+
+       % force regular spacing by introducing notes.
+       \repeat unfold 12 c8
+       >>
     }
-  \new RhythmicStaff \skips
-  \new RhythmicStaff \skips
+    
 >>