[Top][All Lists]
[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