release: 1.5.19

[lilypond.git] / lily / break-align-item.cc

diff --git a/lily/break-align-item.cc b/lily/break-align-item.cc
index 709687ce286a59c94a9ed9a2151698ffef14cc91..8349ce5e632fae99716e7944a3d3e87b8b2e289a 100644 (file)
--- a/lily/break-align-item.cc
+++ b/lily/break-align-item.cc
@@ -140,7 +140,7 @@ Break_align_interface::do_alignment (Grob *me)
        }
 
       SCM symbol = ly_car (extra_space);
-      Real spc = gh_scm2double (gh_cadr (extra_space));
+      Real spc = gh_scm2double (ly_cadr (extra_space));
 
       dists.push (spc);
       symbol_list = gh_cons (symbol, symbol_list);
@@ -152,8 +152,8 @@ Break_align_interface::do_alignment (Grob *me)
   symbol_list  = ly_cdr (scm_reverse (symbol_list));
   for (int i=0; i <elems.size ()-1; i++)
     {
-      elems[i]->set_grob_property (ly_car (symbol_list),
-                                 scm_cons (gh_double2scm (0),
+      elems[i]->internal_set_grob_property (ly_car (symbol_list),
+                                  scm_cons (gh_double2scm (0),
                                            gh_double2scm (dists[i+1])));
 
       symbol_list = ly_cdr (symbol_list);