Re: Feature sponsor request for \paper block

[Daniel Johnson]

Hmm. realized I'd forgotten to CC the list.

> How hard/costly would it be to add 4 more properties? called:
>
> firstHeaderMarkup
> firstFooterMarkup
> lastHeaderMarkup
> lastFooterMarkup
>

%%% BEGIN LILYPOND CODE %%%

\version "2.9.16"

% NOTE: first-page and last-page are defined in ly/titling-init.ly

#(define (not-first-or-last-page layout props arg)
  (if (not (or (= (chain-assoc-get 'page:page-number props -1)
               (ly:output-def-lookup layout 'first-page-number))
            (chain-assoc-get 'page:last? props #f)))
   (interpret-markup layout props arg)
   empty-stencil))

\paper {
  oddHeaderMarkup = \markup {
    \on-the-fly #first-page {
      \fill-line { "This is the first page" }
    }
    \on-the-fly #last-page {
      \fill-line { "This is the last page" }
    }
    \on-the-fly #not-first-or-last-page {
      \fill-line { "" "This is a middle page" }
    }
  }
  evenHeaderMarkup = \markup {
    \on-the-fly #first-page {
      \fill-line { "This is the first page" }
    }
    \on-the-fly #last-page {
      \fill-line { "This is the last page" }
    }
    \on-the-fly #not-first-or-last-page {
      \left-align { "This is a middle page" }
    }
  }
  system-count = 100
}

\score {
  R1*100
}