*** 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 2e2e513f4a325524980e9600ecc83ce62d42ea9b..5cd0a85bfd6d98c7adea2da9a67c7777d8ffb347 100644 (file)
--- a/input/test/slur-attachment-override.ly
+++ b/input/test/slur-attachment-override.ly
@@ -1,24 +1,28 @@
-\version "1.5.49"
+
+\version "2.1.22"
 
 \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 set slur attachments by hand. "
 }
 
 
+%%
+%% except that both slurs are stem <<-> stem.
+%%
+
 fragment = \notes {
-  \property Voice.autoBeaming = ##f
-  \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} 
 }
+