X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=lily%2Fpaper-book.cc;h=c17ed576f1895c0a91febb29164ea9987dda1b0f;hb=d2199b0163c33bcb7504c87e57eefbea93e08c88;hp=3a672198b538df5a880c19b1032db80adb1af946;hpb=ef9512388b15e1e5e2b3592299ffe489ac43abb4;p=lilypond.git

diff --git a/lily/paper-book.cc b/lily/paper-book.cc
index 3a672198b5..c17ed576f1 100644
--- a/lily/paper-book.cc
+++ b/lily/paper-book.cc
@@ -514,7 +514,7 @@ Paper_book::get_system_specs ()
               SCM footnotes = get_footnotes (unsmob<Stencil> (t)->expr ());
               ps->set_property ("footnotes", footnotes);
               ps->set_property ("is-title", SCM_BOOL_T);
-              if (list == texts)
+              if (scm_is_eq (list, texts))
                 first = ps;
               else
                 {