*** empty log message ***

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

diff --git a/lily/cluster-engraver.cc b/lily/cluster-engraver.cc
index a65ee86cbf39d72fcb0447bfe01a56c63f58ec50..9e10915541eeed205ac8fea5eb8ea6cbd12b3660 100644 (file)
--- a/lily/cluster-engraver.cc
+++ b/lily/cluster-engraver.cc
@@ -73,7 +73,7 @@ Cluster_spanner_engraver::process_music ()
     {
       SCM c0scm = get_property ("middleCPosition");
 
-      int c0 =  ly_c_number_p (c0scm) ? ly_scm2int (c0scm) : 0;
+      int c0 =  ly_c_number_p (c0scm) ? scm_to_int (c0scm) : 0;
       int pmax = INT_MIN;
       int pmin = INT_MAX;