This patch is meant to be a TEST ONLY of footnotes at the bottom of

[lilypond.git] / lily / paper-book.cc

diff --git a/lily/paper-book.cc b/lily/paper-book.cc
index 4678ee3895b88d6f8b11bd1e200d213a5dafac8e..7a13120c6464d0f426e8d63fad05cf1d8ef56d1a 100644 (file)
--- a/lily/paper-book.cc
+++ b/lily/paper-book.cc
@@ -532,6 +532,9 @@ Paper_book::get_system_specs ()
                          list == texts? SCM_BOOL_T : SCM_BOOL_F);
 
              paper_system_set_stencil (ps, *unsmob_stencil (t));
+             
+             SCM footnotes = get_footnotes (unsmob_stencil (t)->expr ());
+             ps->set_property ("footnotes", footnotes);
              ps->set_property ("is-title", SCM_BOOL_T);
              if (list != texts)
                /* For each markup other than the first, place it as closely as