]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/page-layout-problem.cc
Release: bump Welcome versions.
[lilypond.git] / lily / page-layout-problem.cc
index 8f1951223c4e8a4721047f848ec296ebc50a5e3f..479ac72bf72ec1152a3b4bd78affeae26fe78262 100644 (file)
@@ -449,7 +449,7 @@ Page_layout_problem::Page_layout_problem (Paper_book *pb, SCM page_scm, SCM syst
 
   for (SCM s = systems; scm_is_pair (s); s = scm_cdr (s))
     {
-      bool first = (s == systems);
+      bool first = scm_is_eq (s, systems);
 
       if (Grob *g = unsmob<Grob> (scm_car (s)))
         {