X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fpage-spacing.cc;h=97c68a5e29ebae8d1ca48151568843940ea0d8b6;hb=dcb458c225534895f69f4c05137809d20d6a79b9;hp=af7546f6717cb567245d76405c16fb765e529b0a;hpb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;p=lilypond.git

diff --git a/lily/page-spacing.cc b/lily/page-spacing.cc
index af7546f671..97c68a5e29 100644
--- a/lily/page-spacing.cc
+++ b/lily/page-spacing.cc
@@ -388,7 +388,8 @@ Page_spacer::calc_subproblem (vsize page, vsize line)
         }
 
       if (page_start > 0
-          && lines_[page_start - 1].page_permission_ == ly_symbol2scm ("force"))
+          && scm_is_eq (lines_[page_start - 1].page_permission_,
+                        ly_symbol2scm ("force")))
         break;
     }
   return !isinf (cur.demerits_);