Merge branch 'master' of ssh://hanwen@repo.or.cz/srv/git/lilypond into master-hanwen

[lilypond.git] / input / test / staff-lines.ly

diff --git a/input/test/staff-lines.ly b/input/test/staff-lines.ly
index 406dd5c3bb603cafebed0da2f6d686494ed2a98c..bfca8e4b4fd85acbb5abc906d68a490274a88615 100644 (file)
--- a/input/test/staff-lines.ly
+++ b/input/test/staff-lines.ly
@@ -1,32 +1,34 @@
 
-\version "1.9.8"
+\version "2.7.39"
 
-\header { texidoc="@cindex Staff Lines
-Staff symbol property set workaround. "
+\header {
+
+    texidoc="@cindex Staff Lines 
+The number of lines in a staff may changed by overriding @code{line-count}
+in the properties of @code{StaffSymbol}.
+"
+         
 }
 
 
-upper = \notes\relative c'' {
-  c1-"x" d-"x" e-"x" f-"x"
+upper = \relative c'' {
+  c1 d e f
 }
 
-lower = \notes\relative c {
-  c1-"x" b-"x" a-"x" g-"x"
+lower = \relative c {
+  c1 b a g
 }
 
 \score {
   \context PianoStaff <<
-    %\time 4/4
     \new Staff <<
       \upper
     >>  
-    \new Staff <<
-      \clef bass
-      \lower
-      \applyoutput #(outputproperty-compatibility
-                    (make-type-checker 'staff-symbol-interface)
-                    'line-count  4)
-    >>  
+    \new Staff  {
+       \override Staff.StaffSymbol  #'line-count = #4 
+        \clef bass
+        \lower
+    }
   >>
-  \paper { raggedright=##t}  
+  \layout { ragged-right=##t}  
 }