X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=ly%2Fpaper-defaults.ly;h=67839f9c6c5695869bc39438f08184b901e03416;hb=954f89c8e98ae11f1aa0f7a31838751ccdd27485;hp=2620cfc1c1e58f2555e793b035e684de44e73492;hpb=72f7b5a436860c741d40b39103a5f758f878afb9;p=lilypond.git diff --git a/ly/paper-defaults.ly b/ly/paper-defaults.ly index 2620cfc1c1..67839f9c6c 100644 --- a/ly/paper-defaults.ly +++ b/ly/paper-defaults.ly @@ -1,4 +1,4 @@ -\version "2.7.39" +\version "2.11.11" #(use-modules (scm layout-page-layout)) \paper { @@ -33,7 +33,7 @@ %% ugh. hard coded? %% - #(layout-set-staff-size (* 20.0 pt)) + #(layout-set-absolute-staff-size (* 20.0 pt)) #(define-public score-title-properties @@ -76,6 +76,19 @@ %% ragged-last-bottom= ##t + %% + %% settings for the page breaker + %% + blank-last-page-force = 0 + blank-after-score-page-force = 2 + blank-page-force = 5 + + %% + %% To limit space between systems on a page with a lot of space left + %% + page-limit-inter-system-space = ##f + page-limit-inter-system-space-factor = 1.4 + #(define font-defaults '((font-encoding . fetaMusic))) @@ -90,7 +103,18 @@ (baseline-skip . 3) (word-space . 0.6))) - #(define page-breaking optimal-page-breaks) + #(define page-breaking ly:optimal-breaking) + #(define page-breaking-wrapper page-breaking-wrapper) + #(define page-post-process post-process-pages) + + #(define write-page-layout (ly:get-option 'dump-tweaks)) + #(define system-maximum-stretch-procedure + (lambda (line) + (if (stretchable-line? line) + (let ((height (line-height line))) + (/ (* height height) 80.0)) + 0.0))) + % #(define page-music-height default-page-music-height ) % #(define page-make-stencil default-page-make-stencil ) @@ -104,9 +128,7 @@ bottom-margin = 6 \mm head-separation = 4 \mm foot-separation = 4 \mm - right-margin = 10 \mm - left-margin = ##f first-page-number = #1 print-first-page-number =##f }