release commit

[lilypond.git] / input / test / ancient-font.ly

diff --git a/input/test/ancient-font.ly b/input/test/ancient-font.ly
index 37f753b81d6a4ffbf48592fe0b71c71958610428..faa151109df3901797a523393fe847c0ef5ea5bf 100644 (file)
--- a/input/test/ancient-font.ly
+++ b/input/test/ancient-font.ly
@@ -1,4 +1,4 @@
-\version "1.9.2"
+\version "2.1.7"
 % TODO: split ancient-font into seperate files; possibly in
 % different locations.
 \header {
@@ -9,15 +9,12 @@ included in LilyPond's support of ancient notation.
 }
 
 
-upperStaff =  \context GregorianStaff = upperStaff <
-  \context GregorianVoice <
+upperStaff =  \context GregorianStaff = upperStaff <<
+  \context GregorianVoice <<
     \property Score.timing = ##f
 %   \property Score.forceAccidental = ##t %%%%%%%% FIXME: what happened to this property?
 
-    % this is broken until further notice -- see refman
-    % \property Staff.StaffSymbol \override #'line-count = #4
-    \context Staff \outputproperty #(make-type-checker 'staff-symbol-interface)
-      #'line-count = #4
+    \property Staff.StaffSymbol \override #'line-count = #4
 
     \notes \transpose c c {
        \property Staff.KeySignature \override #'style = #'vaticana
@@ -112,16 +109,15 @@ upperStaff =  \context GregorianStaff = upperStaff <
        s32*1
 %      \break % 12 (32*1)
     }
-  >
->
+  >>
+>>
 
-lowerStaff =  \context MensuralStaff = lowerStaff <
-  \context MensuralVoice <
+lowerStaff =  \context MensuralStaff = lowerStaff <<
+  \context MensuralVoice <<
     
     % this is broken until further notice -- see refman
     % \property Staff.StaffSymbol \override #'line-count = #5
-    \context Staff \outputproperty #(make-type-checker 'staff-symbol-interface)
-      #'line-count = #5
+    \context Staff \applyoutput #(outputproperty-compatibility (make-type-checker 'staff-symbol-interface) 'line-count 5)
 
     \notes \transpose c c {
        \property Voice.autoBeaming = ##f
@@ -211,14 +207,14 @@ lowerStaff =  \context MensuralStaff = lowerStaff <
        es'! des'! cis'!1 \bar "||"
 %      \break % 12 (8*1)
     }
-  >
->
+  >>
+>>
 
 \score {
-    \context Score <
+    \context Score <<
        \upperStaff
        \lowerStaff
-    >
+    >>
     \paper {
 % do we want to keep these settings? -gp
        linewidth = 17.25\cm