X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;ds=sidebyside;f=ly%2Fpaper-defaults.ly;h=67839f9c6c5695869bc39438f08184b901e03416;hb=84b537f268587f0e424e9ec2e2f45918697d3926;hp=2e265c7ab189a2a8121aee2510e1984915fa7c6f;hpb=d9f0a129bd864743b639c499366bbccf79d27323;p=lilypond.git diff --git a/ly/paper-defaults.ly b/ly/paper-defaults.ly index 2e265c7ab1..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 @@ -80,7 +80,14 @@ %% settings for the page breaker %% blank-last-page-force = 0 - blank-page-force = 10 + 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))) @@ -97,6 +104,17 @@ (word-space . 0.6))) #(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 ) @@ -110,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 }