X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Ftest%2Fvaticana.ly;h=fab7d160206f6e05cf4d1585691f3261a721f3a5;hb=df8f3a0336bb58a017ed5c7ff0019d8314b4de1b;hp=ae51e7f075a141cecaa12a494db711f4e3454c3b;hpb=21497b2395aa5cc9c7b53942802763d49202a646;p=lilypond.git

diff --git a/input/test/vaticana.ly b/input/test/vaticana.ly
index ae51e7f075..fab7d16020 100644
--- a/input/test/vaticana.ly
+++ b/input/test/vaticana.ly
@@ -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 {