lilypond-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: urgent: layout of first page


From: Nicolas Sceaux
Subject: Re: urgent: layout of first page
Date: Tue, 28 Nov 2006 20:49:49 +0100
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (darwin)

Werner LEMBERG <address@hidden> 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




reply via email to

[Prev in Thread] Current Thread [Next in Thread]