X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Flily-guile.cc;h=96e140707b3baa31f4c292c02b8ea87236614a09;hb=07d4d05df6479d58c3c5152c07d7c86b94ee98b4;hp=d771b86923ceaeffdd3a1a51a902101765ee28c3;hpb=301b0906a670e7f7762df325f65d58d8c85f4067;p=lilypond.git

diff --git a/lily/lily-guile.cc b/lily/lily-guile.cc
index d771b86923..96e140707b 100644
--- a/lily/lily-guile.cc
+++ b/lily/lily-guile.cc
@@ -35,14 +35,12 @@ ly_ch_C_eval_scm (char const*c)
 
 /*
   scm_m_quote doesn't use any env, but needs one for a good signature in GUILE.
-
-  Why there is no gh_quote () in GUILE  beats me.
 */
 
 SCM
 ly_quote_scm (SCM s)
 {
-  return scm_cons2 (scm_i_quote, s, SCM_EOL);
+  return scm_m_quote (scm_cons2 (SCM_EOL, s, SCM_EOL) ,SCM_EOL); // apparently env arg is ignored.
 }
 
 /*