patch::: 1.3.59.uu2.jcn1

[lilypond.git] / lily / script-engraver.cc

diff --git a/lily/script-engraver.cc b/lily/script-engraver.cc
index d53c47648f418e72eb6610a4a8e95b6dfcb91693..04f8bf4f8d334d741298474b14bae86da5665316 100644 (file)
--- a/lily/script-engraver.cc
+++ b/lily/script-engraver.cc
@@ -60,9 +60,8 @@ Script_engraver::do_process_music()
     {
       Articulation_req* l=script_req_l_arr_[i];
 
-      SCM list = scm_eval (gh_list (ly_symbol2scm ("articulation-to-scriptdef"),
-                                   ly_str02scm (l->articulation_str_.ch_C()),
-                                   SCM_UNDEFINED));
+      SCM list = scm_assoc (ly_str02scm (l->articulation_str_.ch_C ()),
+                           scm_eval (ly_symbol2scm ("script-alist")));
       
       if (list == SCM_BOOL_F)
        {