input/test/slur-attachment-override.ly

   1 \version "1.7.18"
   2
   3 \header{
   4 texidoc="@cindex Slur Attachment Override
   5 In some cases you may want to set slur attachments by hand. "
   6 }
   7
   8
   9 %%
  10 %% except that both slurs are stem <-> stem.
  11 %%
  12
  13 fragment = \notes {
  14   \property Voice.autoBeaming = ##f
  15   \property Voice.Stem \set #'direction = #1
  16   \property Voice.Slur \set #'direction = #1
  17   d'32( f'4  d8..-)
  18   \property Voice.Slur \set #'attachment = #'(stem . stem)
  19   d,32( f'4  d8.-)
  20 }
  21
  22
  23 \score {
  24         \notes\relative c \fragment
  25         \paper { raggedright = ##t}
  26 }
  27 %% new-chords-done %%