X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fdrarn-slurs.ly;h=a2943912b162707fd24c2c4c3a4c81473001386d;hb=7e8d660df15820c540b74a4ab74d175284cd9008;hp=a0827d18c6f2329ca8539613d22b3ff3ff1bd3bc;hpb=ea8506894a420e3393858a3ee284ab6b2f12c6d6;p=lilypond.git

diff --git a/input/test/drarn-slurs.ly b/input/test/drarn-slurs.ly
index a0827d18c6..a2943912b1 100644
--- a/input/test/drarn-slurs.ly
+++ b/input/test/drarn-slurs.ly
@@ -1,21 +1,23 @@
-\version "1.7.18"
 
+\version "2.1.30"
+% possible rename to slurs-?
+% TODO: find out what drarn means, and if there's an overlap with drarn.ly
 \header{
-texidoc="
+texidoc="@cindex Drarn Slurs
 Slurs can be forced to always attach to note heads.
 "
 }
 
 fragment = \notes {
-  \property Voice.Slur \set #'direction = #1
-  \property Voice.Slur \set #'attachment = #'(head . head)
-  g''16(g-)(g-)(g-)(d'-)(d-)(d-)(d-)
+  \override Slur  #'direction = #1
+  \override Slur  #'attachment = #'(head . head)
+  g''16(g)(g)(g)(d')(d)(d)(d)
 }
 
 \paper { raggedright = ##t} 
 
 \score {
   \notes\relative c \fragment
-  \paper { }  
+  \paper { raggedright = ##t}  
 }
-%% new-chords-done %%
+