X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmensural-ligature.cc;h=12b5218429e2ed1ce70c6a9a784fd36aae7dbf91;hb=2ae38516beda96b730aae513053789f3fa699b46;hp=936f64b877b90d965d8c4d4ab860d9ca10463389;hpb=1bf2062b6126102e7e66ed954a3be9906894ec1b;p=lilypond.git diff --git a/lily/mensural-ligature.cc b/lily/mensural-ligature.cc index 936f64b877..12b5218429 100644 --- a/lily/mensural-ligature.cc +++ b/lily/mensural-ligature.cc @@ -3,7 +3,7 @@ source file of the GNU LilyPond music typesetter - (c) 2002--2006 Juergen Reuter , + (c) 2002--2007 Juergen Reuter , Pal Benko */ @@ -96,7 +96,7 @@ internal_brew_primitive (Grob *me) { programming_error ("Mensural_ligature: " "undefined primitive -> ignoring grob"); - return Stencil (); + return Lookup::blank (Box (Interval (0, 0), Interval (0, 0))); } int primitive = scm_to_int (primitive_scm); @@ -121,7 +121,7 @@ internal_brew_primitive (Grob *me) switch (primitive & MLP_ANY) { case MLP_NONE: - return Stencil (); + return Lookup::blank (Box (Interval (0, 0), Interval (0, 0))); case MLP_LONGA: // mensural brevis head with right cauda out = Font_interface::get_default_font (me)->find_by_name ("noteheads.s-2mensural"); @@ -140,7 +140,7 @@ internal_brew_primitive (Grob *me) default: programming_error (_f ("Mensural_ligature: " "unexpected case fall-through")); - return Stencil (); + return Lookup::blank (Box (Interval (0, 0), Interval (0, 0))); } Real blotdiameter @@ -167,7 +167,7 @@ internal_brew_primitive (Grob *me) SCM join_right_scm = me->get_property ("join-right-amount"); - if (scm_is_pair (join_right_scm)) + if (scm_is_number (join_right_scm)) { int join_right = scm_to_int (join_right_scm); if (join_right) @@ -219,7 +219,7 @@ Mensural_ligature::print (SCM) return SCM_EOL; } -ADD_INTERFACE (Mensural_ligature, "mensural-ligature-interface", +ADD_INTERFACE (Mensural_ligature, "A mensural ligature", "delta-position "