input/test/follow-thread.ly

   1 #(ly:set-option 'old-relative)
   2 \version "1.9.8"
   3 % MERGED: stuff from follow-break.ly to follow-thread.ly
   4
   5 % followVoice: connect note heads with line when thread switches staff
   6 \header{ texidoc="@cindex followVoice Thread
   7 Theads can be traced automagically when they switch staves by setting
   8 property @code{followVoice}. " }
   9
  10
  11 \score {
  12         \notes\relative c {
  13         \new PianoStaff <<
  14                 \property PianoStaff.followVoice = ##t
  15                 \context Staff=one \context Voice {
  16                         \property Voice.VoiceFollower \set #'style = #'dashed-line
  17                         c'1
  18                         \translator Staff=two
  19                         b2 a
  20 % these lines from follow-break.ly:
  21                         \translator Staff=one
  22                         a1
  23                     }
  24                 \context Staff=two {\clef bass \skip 1*3 }
  25                 >>
  26         }
  27
  28   \paper { raggedright = ##t }
  29 }
  30