]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/move-specific-text.ly
Merge branch 'master' of ssh://hanwen@repo.or.cz/srv/git/lilypond into master-hanwen
[lilypond.git] / input / test / move-specific-text.ly
index 6a3e9dc8ea99227254a40d6362070fd3a6f72bce..44db4d861d00bfc4614e4dd0889987766eedce04 100644 (file)
@@ -1,5 +1,5 @@
 
-\version "2.1.26"
+\version "2.9.6"
 % possible rename to scheme- or something like that.  -gp
 \header { texidoc = "@cindex Scheme Move Text
 Objects, like text, can be moved around by using some Scheme code.
@@ -9,12 +9,12 @@ Objects, like text, can be moved around by using some Scheme code.
    (lambda (grob) (equal? text (ly:grob-property grob 'text))))
 
 \score {
-  \notes\relative c''' {
-    \override Stem  #'direction = #1
-    \applyoutput #(outputproperty-compatibility (make-text-checker (make-simple-markup "m.d."))
+  \relative c''' {
+    \stemUp
+    \applyOutput #'Voice #(outputproperty-compatibility (make-text-checker (make-simple-markup "m.d."))
       'extra-offset '(-3.5 . -4.5))
     a^2^"m.d."
   }
-  \paper { raggedright = ##t}
+  \layout { ragged-right = ##t}
 }