X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fpaper-book.cc;h=c17ed576f1895c0a91febb29164ea9987dda1b0f;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=3a672198b538df5a880c19b1032db80adb1af946;hpb=720bdb29cfac44d9469a54d44bb002e1ccab15f9;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 (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 {