X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Finstrument-name.ly;h=121dd420878248034059a6a4659e0daaeb804111;hb=eeec992b7029d0982bf4ed0eb3995e9ca99c10e9;hp=d38f1e0d2d3278fa40b796c8ee4a228202256ae5;hpb=ea8506894a420e3393858a3ee284ab6b2f12c6d6;p=lilypond.git

diff --git a/input/regression/instrument-name.ly b/input/regression/instrument-name.ly
index d38f1e0d2d..121dd42087 100644
--- a/input/regression/instrument-name.ly
+++ b/input/regression/instrument-name.ly
@@ -1,25 +1,36 @@
-\version "1.7.18"
+\version "2.12.0"
 \header{
-texidoc="
+  texidoc="
 Staff margins are also markings attached to barlines.  They should be
-left of the staff, and be centered vertically wrt the staff.  They may
-be on normal staves, but also on compound staves, like the PianoStaff
+left of the staff, and be centered vertically with respect to the staff.  
+They may be on normal staves, but also on compound staves, like the 
+PianoStaff.
 "
 }
 
-	
+\layout {
+  ragged-right = ##t
+}
+
+
 
 
-\score {
 
-  \notes \context PianoStaff <
-    \context Staff = treble    {
-      \property PianoStaff.instrument = "Piano "
-      \property Staff.instrument = "Right " { c''4 }}
-    \context Staff = bass { \property Staff.instrument = "Left " \clef bass c4 }>
 
-\paper {
-raggedright = ##t
-}}
+\new StaffGroup <<
+  \context PianoStaff <<
+    \new Staff    {
+      \set PianoStaff.instrumentName = "Piano"
+      \set Staff.instrumentName = "Right" { c''4 }}
+    \new Staff {
+      \set Staff.instrumentName = "Left"
+      \clef bass c4
+    }
+  >>
 
-%% new-chords-done %%
+  \lyrics {
+    \set vocalName = "bert"
+    blah
+  }
+  \new Staff { c''4 } 
+>>