release: 1.3.38

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

diff --git a/lily/script-engraver.cc b/lily/script-engraver.cc
index 5498b5b7f60f2db2d717bd5e41293609853932da..846cc192e697f3f908e37a891e7a3bdc7f7e73ce 100644 (file)
--- a/lily/script-engraver.cc
+++ b/lily/script-engraver.cc
@@ -60,7 +60,9 @@ Script_engraver::do_process_music()
     {
       Articulation_req* l=script_req_l_arr_[i];
 
-      SCM list = ly_eval_str (("(articulation-to-scriptdef \"" + l->articulation_str_ + "\")").ch_C());
+      SCM list = scm_eval (gh_list (ly_symbol2scm ("articulation-to-scriptdef"),
+                                   ly_str02scm (l->articulation_str_.ch_C()),
+                                   SCM_UNDEFINED));
       
       if (list == SCM_BOOL_F)
        {