]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/drarn.ly
* lily/bar-line.cc (compound_barline): fix : for staff without
[lilypond.git] / input / test / drarn.ly
index 4c37d561f78f4d87601ae97387835950da83f372..8c983ee8f5072afd964700f74d49c885e30ebc25 100644 (file)
@@ -1,28 +1,28 @@
 
-\version "1.9.2"
+\version "2.3.8"
 \header{texidoc="@cindex Drarn
 You can attach slurs and ties to noteheads.
 " }
 
 \score {
-  \context Staff \notes <
+  \context Staff  <<
     
      \relative c'' {
 \time 3/8       
-      \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)
+      \override Stem  #'direction = #1
+      \override Tie  #'direction = #1
+      \override Slur  #'direction = #1
+      \override Slur  #'attachment = #'(head . head)
       c8~c(c)  
     }\\
      \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)
+      \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 } 
 }