Re: finding first page of score in scheme

[Graham Percival]

Nicolas Sceaux wrote:
> Graham Percival <address@hidden> writes:
>
> > I'd like to display something in the footer of the first (and last)
> > pages of each score in a book.
> You may have to hack the function that builds the pages (the
> page-breaking function set in the \paper block).
> See scm/layout-page-layout.scm. But this is not trivial.
>
> A page is created, then filled with lines (text or music systems).
> When the page is created, the footer and header are also created (using
> the markups defined in ly/titling-init.ly), so that the spacing function
> should know how much space is left on the page for the lines.

But doesn't lilypond know when it's compiling a new \score ?  I guess I 
don't know enough about how \books are produced.  This code
(lyoutput-def-lookup layout 'first-page-number)
returns the first page of the \book.  Isn't there another function that 
returns the first page of the \score ?

I suppose that I could hard-code the numbers:
#(define (first-page-score layout props arg)
  (if (= (chain-assoc-get 'page:page-number props -1)
         3|5|7 )
*** I know that's not proper scheme


Cheers,
- Graham