* lily/include/lily-guile.hh: many new ly_ functions. Thanks to

[lilypond.git] / lily / forbid-break-engraver.cc

diff --git a/lily/forbid-break-engraver.cc b/lily/forbid-break-engraver.cc
index a7bf47b2df2924dc84165092c3b2df49ce91f6be..492a35e4f79f560a2c4abaed2583ebd9a6fed405 100644 (file)
--- a/lily/forbid-break-engraver.cc
+++ b/lily/forbid-break-engraver.cc
@@ -21,18 +21,18 @@ Forbid_line_break_engraver::start_translation_timestep ()
   SCM busy = get_property ("busyGrobs");
 
   Moment now = now_mom ();
-  while (gh_pair_p (busy) && unsmob_moment (gh_caar (busy))->main_part_ == now.main_part_)
-    busy = gh_cdr (busy);
+  while (ly_pair_p (busy) && unsmob_moment (ly_caar (busy))->main_part_ == now.main_part_)
+    busy = ly_cdr (busy);
 
   
-  while (gh_pair_p (busy))
+  while (ly_pair_p (busy))
     {
-      Grob *g = unsmob_grob (gh_cdar (busy));
+      Grob *g = unsmob_grob (ly_cdar (busy));
       if (Rhythmic_head::has_interface (g))
        {
          get_score_engraver ()->forbid_breaks ();
        }
-      busy = gh_cdr (busy);
+      busy = ly_cdr (busy);
     }
 }