[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Paper default margins
From: |
Neil Puttock |
Subject: |
Re: Paper default margins |
Date: |
Thu, 22 Oct 2009 23:27:22 +0100 |
2009/10/18 Michael Käppler <address@hidden>:
> I've expanded the regtests to get enough pages.
> Ready to apply?
\book {
\score {
- {
+ \relative c' {
a b c d R1
- \repeat unfold 26 {a4 b c d}
+ \repeat unfold 40 {a4 b c d}
}
}
}
You don't need to change this test.
I think you'll have to split paper-default-margins.ly into separate
files, otherwise it won't work; due to the multiple \book blocks, only
the first book will appear.
+ and apply to the default paper size returned by (ly:get-option
+ 'paper-size). For other paper sizes, they are scaled linearly.
+ This also affects head- and foot-separation as well as indents."
no indent for these lines
+ % This margins apply to the default paper format given by
(ly:get-option 'paper-size)
% These
+(define-public (all-items lst)
This is rather vaguely named, and looks similar to flatten-list. I
think it would be better to keep flatten-list, but amend it to support
pairs.
I wonder why it can't be much simpler (while supporting flattening of
pairs without changing their positions):
(define (flatten-list x)
(cond ((null? x) '())
((not (pair? x)) (list x))
(else (append (flatten-list (car x))
(flatten-list (cdr x))))))
+ (let* ((def (and (not (null? default)) (car default))))
(let ((def (and (pair? default) (car default))))
+ (let* ((entry-symbol
(let ((
space before tab
+ (string->symbol
space before tab
+ (let* ((value-symbol (string->symbol (car value)))
(let ((
Regards,
Neil
0001-Let-default-margins-depend-on-paper-size.patch
Description: Text Data
- Re: Paper default margins,
Neil Puttock <=
- Re: Paper default margins, Michael Käppler, 2009/10/23
- Re: Paper default margins, Neil Puttock, 2009/10/25
- Re: Paper default margins, Michael Käppler, 2009/10/25
- Re: Paper default margins, Neil Puttock, 2009/10/25
- Re: Paper default margins, Michael Käppler, 2009/10/26
- Re: Paper default margins, Neil Puttock, 2009/10/27
- Re: Paper default margins, Michael Käppler, 2009/10/28
- Re: Paper default margins, Neil Puttock, 2009/10/28