* lily/vaticana-ligature-engraver.cc (transform_heads): Bugfix:

	plica head in porrectus deminutus.

diff --git a/ChangeLog b/ChangeLog
index 0a9f347a619a4d31222bf7178fae427e3dd5c9db..ade5a62c860d0aa87b6d1d3c3410b1ae319aa152 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -6,6 +6,9 @@
        * scm/scripts.scm (articulations): Maintenance bugfix:
        follow-into-staff -> quantize-position.
 
+       * lily/vaticana-ligature-engraver.cc (transform_heads): Bugfix:
+       plica head in porrectus deminutus.
+
 2005-11-08  Han-Wen Nienhuys  <hanwen@xs4all.nl>
 
        * lily/tuplet-bracket.cc (print): change check: remove bracket if

diff --git a/lily/vaticana-ligature-engraver.cc b/lily/vaticana-ligature-engraver.cc
index 90e6e59a97128687f485bb2a6af5396dcca3dfb6..82bf53aaaceca0aeb11194f52abf6c946506d553 100644 (file)
--- a/lily/vaticana-ligature-engraver.cc
+++ b/lily/vaticana-ligature-engraver.cc
@@ -429,15 +429,13 @@ Vaticana_ligature_engraver::transform_heads (Spanner *ligature,
            if (! (prev_context_info & FLEXA_RIGHT))
              /* correct head of previous primitive */
              if (prev_delta_pitch > 1)
-               {
-                 prev_glyph_name = "svaticana.epiphonus";
-                 glyph_name = "svaticana.plica";
-               }
+               prev_glyph_name = "svaticana.epiphonus";
              else
-               {
-                 prev_glyph_name = "svaticana.vepiphonus";
-                 glyph_name = "svaticana.vplica";
-               }
+               prev_glyph_name = "svaticana.vepiphonus";
+           if (prev_delta_pitch > 1)
+             glyph_name = "svaticana.plica";
+           else
+             glyph_name = "svaticana.vplica";
          }
        else if (prev_delta_pitch < 0)
          {