* configure.in: check for C language.

[lilypond.git] / lily / midi-item.cc

diff --git a/lily/midi-item.cc b/lily/midi-item.cc
index 9ade245a717fe39c17aa26a753d7a514fdb9f8a6..1fd33773adf9123177d1eaa25bffb9186e8b3e53 100644 (file)
--- a/lily/midi-item.cc
+++ b/lily/midi-item.cc
@@ -144,7 +144,7 @@ Midi_instrument::to_string () const
   /*
     UGH. don't use eval.
    */
-  SCM proc = scm_primitive_eval (ly_symbol2scm ("midi-program")); 
+  SCM proc = ly_scheme_function ("midi-program");
   SCM program = gh_call1 (proc, ly_symbol2scm (audio_->str_.to_str0 ()));
   found = (program != SCM_BOOL_F);
   if (found)