release: 1.3.81

[lilypond.git] / lily / chord-name.cc

diff --git a/lily/chord-name.cc b/lily/chord-name.cc
index c8e8e785ac8e55a7c419476a2c0f4a74c7fe1b8c..3d786acc8182ae746c968ba96db344292d4f8278 100644 (file)
--- a/lily/chord-name.cc
+++ b/lily/chord-name.cc
@@ -167,11 +167,12 @@ Chord_name::brew_molecule (SCM smob)
     bass = SCM_BOOL_F;
 
   SCM pitches =  sc->get_elt_property ("pitches");
-  SCM text = scm_eval (gh_list (ly_symbol2scm ("chord::user-name"),
+  SCM text = scm_eval2 (gh_list (ly_symbol2scm ("chord::user-name"),
                                style,
                                ly_quote_scm (pitches),
                                ly_quote_scm (gh_cons (inversion, bass)),
-                               SCM_UNDEFINED));
+                               SCM_UNDEFINED),
+                       SCM_EOL);
 
   return ly_text2molecule (sc, text).create_scheme ();
 }