-\version "2.7.32"
+\version "2.11.6"
% TODO: split ancient-font into seperate files; possibly in
% different locations.
\header {
}
-upperStaff = \context GregorianStaff = "upperStaff" <<
+upperStaff = \new GregorianStaff = "upperStaff" <<
\context GregorianVoice <<
\set Score.timing = ##f
% \set Score.forceAccidental = ##t %%%%%%%% FIXME: what happened to this property?
\override Staff.StaffSymbol #'line-count = #4
\transpose c c {
- \override Staff.KeySignature #'style = #'vaticana
- \override Staff.Accidental #'style = #'vaticana
+ \override Staff.KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
+ \override Staff.Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
\override NoteHead #'style = #'vaticana.punctum
\key es \major
\clef "vaticana-fa2"
\override NoteHead #'style = #'vaticana.cephalicus
es f
- \override Staff.KeySignature #'style = #'medicaea
- \override Staff.Accidental #'style = #'medicaea
+ \override Staff.KeySignature #'glyph-name-alist = #alteration-medicaea-glyph-name-alist
+ \override Staff.Accidental #'glyph-name-alist = #alteration-medicaea-glyph-name-alist
\override Staff.Custos #'style = #'medicaea
\override NoteHead #'style = #'medicaea.punctum
\clef "medicaea-fa2"
\override NoteHead #'style = #'medicaea.rvirga
e! des! ces!
- \override Staff.KeySignature #'style = #'hufnagel
- \override Staff.Accidental #'style = #'hufnagel
+ \override Staff.KeySignature #'glyph-name-alist = #alteration-hufnagel-glyph-name-alist
+ \override Staff.Accidental #'glyph-name-alist = #alteration-hufnagel-glyph-name-alist
\override Staff.Custos #'style = #'hufnagel
\override NoteHead #'style = #'hufnagel.punctum
\clef "hufnagel-fa2"
>>
>>
-lowerStaff = \context MensuralStaff = "lowerStaff" <<
+lowerStaff = \new MensuralStaff = "lowerStaff" <<
\context MensuralVoice <<
% this is broken until further notice -- see refman
% \override Staff.StaffSymbol #'line-count = #5
- \context Staff \applyOutput #(outputproperty-compatibility (make-type-checker 'staff-symbol-interface) 'line-count 5)
+ \applyOutput #'Staff #(outputproperty-compatibility (make-type-checker 'staff-symbol-interface) 'line-count 5)
\transpose c c {
\set autoBeaming = ##f
\accepts MensuralVoice
\consists Custos_engraver
\override TimeSignature #'style = #'mensural
- \override KeySignature #'style = #'mensural
- \override Accidental #'style = #'mensural
+ \override KeySignature #'glyph-name-alist = #alteration-mensural-glyph-name-alist
+ \override Accidental #'glyph-name-alist = #alteration-mensural-glyph-name-alist
\override Custos #'style = #'mensural
\override Custos #'neutral-position = #3
\override Custos #'neutral-direction = #down
\remove Time_signature_engraver
\override StaffSymbol #'thickness = #2.0
\override StaffSymbol #'line-count = #4
- \override KeySignature #'style = #'vaticana
- \override Accidental #'style = #'vaticana
+ \override KeySignature #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
+ \override Accidental #'glyph-name-alist = #alteration-vaticana-glyph-name-alist
\override Custos #'style = #'vaticana
\override Custos #'neutral-position = #4
\override Custos #'neutral-direction = #down