]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/text-engraver.cc
autogen is not autogenned.
[lilypond.git] / lily / text-engraver.cc
index 2c86f50d67cc4e00aad9e3c144d7d565ec1e9d0f..bf1dfbd81182dd731d4d7caca5035db8759f13ce 100644 (file)
@@ -88,14 +88,8 @@ Text_engraver::process_acknowledged ()
       // URG: Text vs TextScript
       Item *text = make_item ("TextScript", r->self_scm ());
 
-      Axis ax = Y_AXIS;
-      Side_position_interface::set_axis (text, ax);
-
-      // Hmm
-      int priority = 200;
-      SCM s = text->get_property ("script-priority");
-      if (scm_is_number (s))
-       priority = scm_to_int (s);
+      int priority = robust_scm2int (text->get_property ("script-priority"),
+                                    200);
 
       /* see script-engraver.cc */
       priority += i;
@@ -130,6 +124,5 @@ ADD_ACKNOWLEDGER (Text_engraver, rhythmic_head);
 ADD_TRANSLATOR (Text_engraver,
                /* doc */ "Create text-scripts",
                /* create */ "TextScript",
-               /* accept */ "text-script-event",
                /* read */ "",
                /* write */ "");