remove bogus docstring.

[lilypond.git] / input / test / part-combine-moments.ly

diff --git a/input/test/part-combine-moments.ly b/input/test/part-combine-moments.ly
index 8953992baccbc33cb35a311f65406ca94614de88..bcf0124b10e6c720be19d4c5fc70a5d677a086f3 100644 (file)
--- a/input/test/part-combine-moments.ly
+++ b/input/test/part-combine-moments.ly
@@ -1,7 +1,17 @@
+
+\version "1.9.8"
+% TODO: this example has a ton of text for very little output.
+% Is it all needed?  -gp
+% should this go to regression or be delete'd?   -gp
+\header{ texidoc="@cindex Part Combine Moments
+When you combine two voices with the same notes, you should
+only have one stem. "
+}
+
 \score{
-       \context PianoStaff <
-               \context StaffCombineStaff=one \skip 1*2;
-               \context StaffCombineStaff=two \skip 1*2;
+       \context PianoStaff <<
+               \context StaffCombineStaff=one \skip 1*2
+               \context StaffCombineStaff=two \skip 1*2
                \context StaffCombineStaff=one \partcombine StaffCombineStaff
                        \context StaffCombineVoice=one \notes\relative c''
                                {
@@ -13,34 +23,34 @@
                                        c4 d e f
                                        c2 e2
                                }
-               >
+               >>
        \paper {
+               raggedright= ##t
+               textheight = 295.0\mm
+               linewidth = 180.0\mm
 
-               textheight = 295.0\mm;
-               linewidth = 180.0\mm;
-
-               \translator{ \HaraKiriStaffContext }
+               \translator{ \RemoveEmptyStaffContext }
                %
                % The Voice combine hierarchy
                %
                \translator{
                        \ThreadContext
-                       \name "VoiceCombineThread";
-                       \consists "Rest_engraver";
+                       \name "VoiceCombineThread"
+                       \consists "Rest_engraver"
                }
                \translator{
                        \VoiceContext
-                       \name "VoiceCombineVoice";
+                       \name "VoiceCombineVoice"
                        soloText = #"I."
                        soloIIText = #"II."
-                       \remove "Rest_engraver";
-                       \accepts "VoiceCombineThread";
+                       \remove "Rest_engraver"
+                       \accepts "VoiceCombineThread"
                }
                \translator{
-                       \HaraKiriStaffContext
-                       \consists "Mark_engraver";
-                       \name "VoiceCombineStaff";
-                       \accepts "VoiceCombineVoice";
+                       \RemoveEmptyStaffContext
+                       \consists "Mark_engraver"
+                       \name "VoiceCombineStaff"
+                       \accepts "VoiceCombineVoice"
                }
 
                %
@@ -48,49 +58,45 @@
                %
                \translator{
                        \ThreadContext
-                       \name "StaffCombineThread";
+                       \name "StaffCombineThread"
                }
                \translator{
                        \VoiceContext
-                       \name "StaffCombineVoice";
-                       \accepts "StaffCombineThread";
-                       \consists "Thread_devnull_engraver";
+                       \name "StaffCombineVoice"
+                       \accepts "StaffCombineThread"
+                       \consists "Thread_devnull_engraver"
                }
                \translator {
-                       \HaraKiriStaffContext
-                       \name "StaffCombineStaff";
-                       \accepts "StaffCombineVoice";
+                       \RemoveEmptyStaffContext
+                       \name "StaffCombineStaff"
+                       \accepts "StaffCombineVoice"
 
                        soloADue = ##t
                        soloText = #""
                        soloIIText = #""
                        aDueText = #""
                        splitInterval = #'(1 . 0)
-                       changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
+                       changeMoment = #`(,(ly:make-moment 1 1) . ,(ly:make-moment 1 1))
 
                }
                \translator {
                        \StaffGroupContext
-                       \accepts "VoiceCombineStaff";
-                       \accepts "StaffCombineStaff";
+                       \accepts "VoiceCombineStaff"
+                       \accepts "StaffCombineStaff"
                }
-               \translator{ \HaraKiriStaffContext }
+               \translator{ \RemoveEmptyStaffContext }
 
                \translator {
                        \ScoreContext
-                       \accepts "VoiceCombineStaff";
-                       \accepts "StaffCombineStaff";
+                       \accepts "VoiceCombineStaff"
+                       \accepts "StaffCombineStaff"
                        skipBars = ##t 
 
-                       barScriptPadding = #2.0 % dimension \pt
-                       markScriptPadding = #4.0
-
-                       %% urg: in pt?
-                       barNumberScriptPadding = #15
-                       %% URG: this changes dynamics too
-                       %%textStyle = #"italic"
-                       timeSignatureStyle = #"C"
-                       maximumRestCount = #1
+                       RehearsalMark \override #'padding = #4
+                       BarNumber \override #'padding = #3
+                       TimeSignature \override #'style = #'C
+                       RestCollision \set #'maximum-rest-count = #1
                }
        }
 }
+