]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/vaticana.ly
rename.
[lilypond.git] / input / test / vaticana.ly
index ae51e7f075a141cecaa12a494db711f4e3454c3b..fab7d160206f6e05cf4d1585691f3261a721f3a5 100644 (file)
@@ -1,15 +1,19 @@
-\version "1.7.10"
-\header {
-    title      = "vaticana ligature test"
-    date       = "2003"
+\version "1.7.19"
+% possible rename to ancient-something.
+
+\header { texidoc      = "Ancient Vaticana
+Vaticana ligature test. "
 }
 
-\include "paper26.ly"
 \include "gregorian-init.ly"
 
 %
 % FIXME: custodes and clefs do not show on all staves
-% FIXME: some set_char_box() definitions seem to be bad
+%
+
+%
+% FIXME: move VaticnaStaff/VaticanaVoice definition to engraver-init.ly?
+% Or rather to gregorian-init.ly?
 %
 
 cantus = \notes \relative c {
@@ -36,19 +40,21 @@ verba = \context Lyrics = verba \lyrics {
   \paper {
     stafflinethickness = \staffspace / 5.0
     linewidth = 15.0 \cm
+    indent = 0.0
+       raggedright = ##t
 %
-% FIXME: ragged-right alignment is currently broken
-%   width = 15.0 \cm
-%   raggedright = ##t
+% FIXME: packed alignment is currently broken
 %
+
     \translator {
       \VoiceContext
       \name VaticanaVoice
       \alias Voice
+      \remove "Stem_engraver"
       \remove Ligature_bracket_engraver
       \consists Vaticana_ligature_engraver
       NoteHead \set #'style = #'vaticana_punctum
-      Stem \set #'transparent = ##t
+%     TextScript \set #'padding = #0.0
     }
     \translator {
       \StaffContext
@@ -67,7 +73,7 @@ verba = \context Lyrics = verba \lyrics {
       Custos \set #'adjust-if-on-staffline = ##t
     }
     \translator {
-      \HaraKiriStaffContext
+      \RemoveEmptyStaffContext
       \accepts VaticanaVoice
     }
     \translator {