Re: Répéter le titre sur toute les pages

[Valentin Villenave]

On 5/6/20, david <address@hidden> wrote:
> Est-ce qu'il y a un moyen de récupérer également automatiquement le
> nombre total de pages du document, pour que le "?" soit automatiquement
> remplacé par sa valeur ?

Moui d’une certaine façon, mais ça reste du bricolage :

%%%%

#(define-markup-list-command (total-pages layout props) ()
   (map (lambda (toc-item)
          (if (memq 'tocEnd toc-item)
              (interpret-markup
               layout
               (cons
                (list
                 (cons 'toc:page
                       (markup #:page-ref (car toc-item) "X" "?")))
                props)
               (make-fromproperty-markup 'toc:page))))
        (toc-items)))

tocEnd =
#(define-music-function () ()
   (context-spec-music
    (make-sequential-music
     (list (add-toc-item! 'tocEnd "")
           (make-music 'Music 'void #t)))
    'Devnull))

\paper {
  oddFooterMarkup = \markup \fill-line {
    \line {\fromproperty #'page:page-number-string / \total-pages }
  }
  oddHeaderMarkup = ##f
  evenHeaderMarkup = ##f
}

\repeat unfold 48 {b1\break}

\tocEnd

%%%%

V. V.