]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/vaticana-ligature-engraver.cc
* lily/open-type-font.cc (load_scheme_table): new function
[lilypond.git] / lily / vaticana-ligature-engraver.cc
index 7a02f96a4ff8e5b1e39acf1ac63214f85c4447e5..de737860b03af621dceef7ab0d33097975585697 100644 (file)
@@ -229,7 +229,7 @@ Vaticana_ligature_engraver::align_heads (Array<Grob_info> primitives,
          head_width = 0.0;
          x_offset = join_thickness -
            Font_interface::get_default_font (primitive)->
-           find_by_name ("noteheads-" + glyph_name).extent (X_AXIS).length ();
+           find_by_name ("noteheads." + glyph_name).extent (X_AXIS).length ();
        }
       else if (!String::compare (glyph_name, "flexa") ||
               !String::compare (glyph_name, ""))
@@ -249,7 +249,7 @@ Vaticana_ligature_engraver::align_heads (Array<Grob_info> primitives,
           */
          head_width =
            Font_interface::get_default_font (primitive)->
-           find_by_name ("noteheads-" + glyph_name).extent (X_AXIS).length ();
+           find_by_name ("noteheads." + glyph_name).extent (X_AXIS).length ();
          x_offset = 0.0;
        }
 
@@ -348,9 +348,9 @@ void
 Vaticana_ligature_engraver::transform_heads (Spanner *ligature,
                                             Array<Grob_info> primitives)
 {
-  Real flexa_width= robust_scm2double ( ligature->get_property ("flexa-width"), 2);
+  Real flexa_width = robust_scm2double ( ligature->get_property ("flexa-width"), 2);
 
-  Real thickness= robust_scm2double ( ligature->get_property ("thickness"), 1);
+  Real thickness = robust_scm2double ( ligature->get_property ("thickness"), 1);
 
   Item *prev_primitive = 0;
   int prev_prefix_set = 0;
@@ -569,7 +569,7 @@ Vaticana_ligature_engraver::transform_heads (Spanner *ligature,
   Item *first_primitive = dynamic_cast<Item*> (primitives[0].grob_);
   Paper_column *paper_column = first_primitive->get_column ();
   paper_column->warning (_f ("Vaticana_ligature_engraver: "
-                            "setting `spacing-increment = %f': ptr=%ul",
+                            "setting `spacing-increment = %f': ptr =%ul",
                             ligature_width, paper_column));
   paper_column->
     set_property ("forced-spacing", scm_make_real (ligature_width));
@@ -577,7 +577,7 @@ Vaticana_ligature_engraver::transform_heads (Spanner *ligature,
 }
 
 
-ENTER_DESCRIPTION (Vaticana_ligature_engraver,
+ADD_TRANSLATOR (Vaticana_ligature_engraver,
 /* descr */       "Handles ligatures by glueing special ligature heads together.",
 /* creats*/       "VaticanaLigature",
 /* accepts */     "ligature-event",