release: 1.3.93

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

diff --git a/lily/break-align-item.cc b/lily/break-align-item.cc
index d8c5f6d2b230a10982e0b7319f37f6df00b8d1ce..ad1f1cbb47a1599fc5e4426b55e10030a297974f 100644 (file)
--- a/lily/break-align-item.cc
+++ b/lily/break-align-item.cc
@@ -110,12 +110,12 @@ Break_align_interface::do_alignment (Score_element *me)
        }
       else
        next_origin = ly_symbol2scm ("begin-of-note");
-      
+
+      SCM alist = me->get_elt_property ("space-alist");
       SCM e = scm_assoc (scm_listify (current_origin,
                                      next_origin,
-                                     SCM_UNDEFINED),
-                        scm_eval2 (ly_symbol2scm ("space-alist"), SCM_EOL));
-      
+                                     SCM_UNDEFINED), alist);
+          
       SCM extra_space;
       if (e != SCM_BOOL_F)
        {