]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/drarn.ly
* scripts/convert-ly.py (conv): remove \notes.
[lilypond.git] / input / test / drarn.ly
index 02db4fb37502f5149869ea011051db56ffed37cb..4435d7131924b578901900b5083e094e7871c1e1 100644 (file)
@@ -1,27 +1,29 @@
-\version "1.7.18"
+
+\version "2.3.4"
 \header{texidoc="@cindex Drarn
 You can attach slurs and ties to noteheads.
 " }
 
 \score {
-  \context Staff \notes <
-    \time 3/8
-    \context Voice=one \relative c'' {
-      \property Voice.Stem \set #'direction = #1
-      \property Voice.Tie \set #'direction = #1
-      \property Voice.Slur \set #'direction = #1
-      \property Voice.Slur \set #'attachment = #'(head . head)
-      c8~c(c-)  
-    }
-    \context Voice=two \relative c'' {
-      \property Voice.Stem \set #'direction = #-1
-      \property Voice.Tie \set #'direction = #-1
-      \property Voice.Slur \set #'direction = #-1
-      \property Voice.Slur \set #'attachment = #'(head . head)
-      a8(a-)-~a  
+  \context Staff  <<
+    
+     \relative c'' {
+\time 3/8       
+      \override Stem  #'direction = #1
+      \override Tie  #'direction = #1
+      \override Slur  #'direction = #1
+      \override Slur  #'attachment = #'(head . head)
+      c8~c(c)  
+    }\\
+     \relative c'' {
+      \override Stem  #'direction = #-1
+      \override Tie  #'direction = #-1
+      \override Slur  #'direction = #-1
+      \override Slur  #'attachment = #'(head . head)
+      a8(a)~a  
     }
-  >
+  >>
   \paper { linewidth = 40*\staffspace
                raggedright = ##t } 
 }
-%% new-chords-done %%
+