-\version "1.7.6"
+
+\version "2.3.4"
+
\header {
-texidoc="staff symbol property set workaround"
+
+ 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
- \context Staff = upper <
+ \context PianoStaff <<
+ \new Staff <<
\upper
- \outputproperty #(make-type-checker 'staff-symbol-interface)
- #'line-count = #5
- >
- \context Staff = lower <
- \clef bass
- \lower
- \outputproperty #(make-type-checker 'staff-symbol-interface)
- #'line-count = #4
- >
- >
- \paper { }
- \midi { }
-}%% new-chords-done %%
+ >>
+ \new Staff {
+ \override Staff.StaffSymbol #'line-count = #4
+ \clef bass
+ \lower
+ }
+ >>
+ \paper { raggedright=##t}
+}