(Lilypond_snippet.notice_include):

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

diff --git a/input/test/staff-lines.ly b/input/test/staff-lines.ly
index e7b18c19f09bc4f0d998287ac7c777af960aa1f3..33c5c923032326ad0a4c953ad775cf7110c061f9 100644 (file)
--- a/input/test/staff-lines.ly
+++ b/input/test/staff-lines.ly
@@ -1,32 +1,32 @@
 
-\version "1.9.4"
+\version "2.1.7"
 
-\header { texidoc="@cindex Staff Lines
-Staff symbol property set workaround. "
+\header {
+
+    texidoc="@cindex Staff Lines Staff symbol properties may also be
+ set with @code{\\property}. "
+         
 }
 
 
 upper = \notes\relative c'' {
-  c1-"x" d-"x" e-"x" f-"x"
+  c1 d e f
 }
 
 lower = \notes\relative c {
-  c1-"x" b-"x" a-"x" g-"x"
+  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  {
+       \property Staff.StaffSymbol \set #'line-count = #4 
+        \clef bass
+        \lower
+    }
   >>
   \paper { raggedright=##t}  
 }