X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fone-page-breaking.cc;h=bba283d9612382eb9a9f5e6de3cd46f15970b9ff;hb=2fef7b7eb7ac5d7a2ed237bf22a6ec6fe5d946d9;hp=6962aaf20508b1ce93a0e39ba691bb031cccb46a;hpb=74daefdc62920b729061cb8711b63890de1f0c17;p=lilypond.git

diff --git a/lily/one-page-breaking.cc b/lily/one-page-breaking.cc
index 6962aaf205..bba283d961 100644
--- a/lily/one-page-breaking.cc
+++ b/lily/one-page-breaking.cc
@@ -94,7 +94,7 @@ One_page_breaking::solve ()
     {
       SCM this_pos = scm_car (c);
       line_posns.push_back (scm_to_double (this_pos));
-      if (scm_gr_p (this_pos, lowest_line_pos))
+      if (scm_is_true (scm_gr_p (this_pos, lowest_line_pos)))
         lowest_line_pos = this_pos;
     }