*** empty log message ***

[lilypond.git] / input / test / slur-attachment-override.ly

diff --git a/input/test/slur-attachment-override.ly b/input/test/slur-attachment-override.ly
index d747f24956c7d97f2ef6efd1790cd495b8d8a4d3..beb8b492b0a45f13aa73c5628627455d9959cf7f 100644 (file)
--- a/input/test/slur-attachment-override.ly
+++ b/input/test/slur-attachment-override.ly
@@ -1,24 +1,29 @@
-\version "1.3.146"
+
+\version "2.2.0"
 
 \header{
-texidoc="
-In some cases, you may want to set slur attachments by hand.
-"
+texidoc="@cindex Slur Attachment Override
+In some cases, you may want to control the attachment points of a slur 
+by hand. "
 }
 
 
+%%
+%% except that both slurs are stem <<-> stem.
+%%
+
 fragment = \notes {
-  \property Voice.noAutoBeaming = ##t
-  \property Voice.Stem \set #'direction = #1
-  \property Voice.Slur \set #'direction = #1
-  d'32( f'4 )d8..
-  \property Voice.Slur \set #'attachment = #'(stem . stem)
-  d,32( f'4 )d8.
+  \set autoBeaming = ##f
+  \override Stem  #'direction = #1
+  \override Slur  #'direction = #1
+  d'32( f'4  d8..)
+  \override Slur  #'attachment = #'(stem . stem)
+  d,32( f'4  d8.)
 }
 
-\paper { linewidth = -1. } 
 
 \score {
-  \notes\relative c \fragment
-  \paper { }  
+       \notes\relative c \fragment
+       \paper { raggedright = ##t} 
 }
+