]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/slur-ugly.ly
(class New_slur): new file. Score based slur
[lilypond.git] / input / test / slur-ugly.ly
index 01850ca4c9868321ed97097bc31ef174761decc1..e21f7290993c9fbd83aa1410ef3c66c9ba7441a4 100644 (file)
@@ -1,16 +1,16 @@
 
-\version "2.1.36"
+\version "2.3.4"
 
 \header { texidoc="@cindex Slur Ugly
 Strange slurs can be produced by setting properties by hand. "
 }
 
-baseWalk = \notes \relative c {
+baseWalk =  \relative c {
   d,8( a' d f a d f d a f d  a)
 }
 
 \score {
-  \notes \context PianoStaff <<
+   \context PianoStaff <<
     \time 6/4
     \context Staff=up { s1 * 6/4 }
     \context Staff=down <<
@@ -22,13 +22,13 @@ baseWalk = \notes \relative c {
   \paper {
     raggedright = ##t
     \context {
-      \VoiceContext
+      \Voice
       \override Slur #'beautiful = #5.0
       \override Slur #'direction = #1
       \override Stem #'direction = #-1
     }
     \context {
-      \PianoStaffContext
+      \PianoStaff
       \override VerticalAlignment #'threshold = #'(5 . 5)
     }
   }