* lily/ledger-line-spanner.cc (print): swap linear_combination

[lilypond.git] / lily / lookup.cc

diff --git a/lily/lookup.cc b/lily/lookup.cc
index 63c37a2c9788381be89e5d86b0453a575d2ab934..d0c7ed4dbde58a467ab836f479901e06c500a428 100644 (file)
--- a/lily/lookup.cc
+++ b/lily/lookup.cc
@@ -452,8 +452,8 @@ Stencil
 Lookup::accordion (SCM s, Real staff_space, Font_metric *fm) 
 {
   Stencil m;
-  String sym = ly_scm2string (ly_car (s));
-  String reg = ly_scm2string (ly_car (ly_cdr (s)));
+  String sym = ly_scm2string (scm_car (s));
+  String reg = ly_scm2string (scm_car (scm_cdr (s)));
 
   if (sym == "Discant")
     {