(Lilypond_snippet.notice_include):

[lilypond.git] / input / test / move-accidentals.ly

diff --git a/input/test/move-accidentals.ly b/input/test/move-accidentals.ly
index 624ff0bac433250d5e6d9b31dafe5f382e5110b5..076813a6e7a7cf542425c4e49f1ab9c3aa71226f 100644 (file)
--- a/input/test/move-accidentals.ly
+++ b/input/test/move-accidentals.ly
@@ -1,5 +1,5 @@
-#(ly:set-option 'old-relative)
-\version "1.9.4"
+\version "2.1.7"
+
 % possible rename to scheme- or something like that.  -gp
 \header { texidoc= "@cindex Scheme Manual Accidentals
 Positions of accidentals may be manually set. This
@@ -18,14 +18,14 @@ involves some scheme code. " }
     c2.
     <<
 \property Staff.AccidentalPlacement = \turnOff
-\context Staff \outputproperty #(make-acc-position-checker 9)
-                               #'extra-offset = #'(-1 . 0)
-\context Staff \outputproperty #(make-acc-position-checker 5)
-                               #'extra-offset = #'(-2 . 0)
-\context Staff \outputproperty #(make-acc-position-checker 3)
-                               #'extra-offset = #'(-3 . 0)
-\context Staff \outputproperty #(make-acc-position-checker 2)
-                               #'extra-offset = #'(-4 . 0)
+\context Staff \applyoutput #(outputproperty-compatibility (make-acc-position-checker 9)
+                               'extra-offset  '(-1 . 0))
+\context Staff \applyoutput #(outputproperty-compatibility (make-acc-position-checker 5)
+                               'extra-offset  '(-2 . 0))
+\context Staff \applyoutput #(outputproperty-compatibility (make-acc-position-checker 3)
+                               'extra-offset  '(-3 . 0))
+\context Staff \applyoutput #(outputproperty-compatibility (make-acc-position-checker 2)
+                               'extra-offset  '(-4 . 0))
       d!4
       eis
       gis