release commit

[lilypond.git] / input / test / drarn-slurs.ly

diff --git a/input/test/drarn-slurs.ly b/input/test/drarn-slurs.ly
index 1a108bd69757b3b8859fe4f37cd1f7c19dcdd54c..a2943912b162707fd24c2c4c3a4c81473001386d 100644 (file)
--- a/input/test/drarn-slurs.ly
+++ b/input/test/drarn-slurs.ly
@@ -1,21 +1,23 @@
-\version "1.7.16"
 
+\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 %%
+