Werner LEMBERG <[EMAIL PROTECTED]> writes:

> Independently of this, I think it is another error that
> `head-separation' and `page-top-space' are applied on the first page
> if a title is present.
>
> To circumvent this I would like to say
>
>   page-top-space =
>     #(if (not-first-page)
>           (* 12 mm)
>         0)
>
> within the \header block, however, it doesn't work.  Can someone
> please help me quickly by providing an equivalent to the
> `not-first-page' function which works in the \header block?

You'd rather have to modify the function that computes the first system
position on page: `first-line-position' in the file
scm/layout-page-layout.scm

;; not tested
(define (first-line-position line layout)
  "Position of the first line on page"
  (max (+ (if (ly:prob-property? line 'is-title)
              0.0 ; do not use page-top-space when the 1st line is a title
              (ly:output-def-lookup layout 'page-top-space))
          (interval-end (paper-system-staff-extents line)))
       (interval-end (paper-system-extent line Y))))

nicolas


_______________________________________________
lilypond-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to