]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/forbid-break-engraver.cc
Issue 4997/6: Use Preinit for font metrics
[lilypond.git] / lily / forbid-break-engraver.cc
index 81c03e15bef45389532dd6621e97289aa1bee5bf..9cfdef24c82566634160bc4d22ba655e2be1e9e2 100644 (file)
@@ -46,29 +46,35 @@ Forbid_line_break_engraver::start_translation_timestep ()
   SCM busy = get_property ("busyGrobs");
 
   Moment now = now_mom ();
-  while (scm_is_pair (busy) && unsmob_moment (scm_caar (busy))->main_part_ == now.main_part_)
+  while (scm_is_pair (busy) && unsmob<Moment> (scm_caar (busy))->main_part_ == now.main_part_)
     busy = scm_cdr (busy);
 
   while (scm_is_pair (busy))
     {
-      Grob *g = unsmob_grob (scm_cdar (busy));
+      Grob *g = unsmob<Grob> (scm_cdar (busy));
       if (g->internal_has_interface (ly_symbol2scm ("rhythmic-grob-interface")))
         context ()->get_score_context ()->set_property ("forbidBreak", SCM_BOOL_T);
       busy = scm_cdr (busy);
     }
 }
 
+void
+Forbid_line_break_engraver::boot ()
+{
+
+}
+
 ADD_TRANSLATOR (Forbid_line_break_engraver,
-               /* doc */
-               "Forbid line breaks when note heads are still playing at some"
-               " point.",
+                /* doc */
+                "Forbid line breaks when note heads are still playing at some"
+                " point.",
 
-               /* create */
-               "",
+                /* create */
+                "",
 
-               /* read */
-               "busyGrobs ",
+                /* read */
+                "busyGrobs ",
 
-               /* write */
-               "forbidBreak "
-               );
+                /* write */
+                "forbidBreak "
+               );