From: Jürgen Reuter <j@web.de>
Date: Tue, 8 Nov 2005 23:25:20 +0000 (+0000)
Subject: 	* lily/vaticana-ligature-engraver.cc (transform_heads): Bugfix:
X-Git-Tag: release/2.7.17~40
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=4282734857ca98e442db54426ab9811b5c2ffadb;p=lilypond.git

	* lily/vaticana-ligature-engraver.cc (transform_heads): Bugfix:
	plica head in porrectus deminutus.
---

diff --git a/ChangeLog b/ChangeLog
index 0a9f347a61..ade5a62c86 100644
--- 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 90e6e59a97..82bf53aaac 100644
--- 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)
 	  {