]> git.donarmstrong.com Git - lilypond.git/blobdiff - ly/paper-defaults-init.ly
Run grand-replace (issue 3765)
[lilypond.git] / ly / paper-defaults-init.ly
index 1ee92ed19736f2c35e5a4c73eec4c99772358a6f..ef7419312271c1de3f975c10be5d375c6889ab56 100644 (file)
@@ -1,6 +1,27 @@
-\version "2.12.0"
+%%%% This file is part of LilyPond, the GNU music typesetter.
+%%%%
+%%%% Copyright (C) 2004--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+%%%%                          Jan Nieuwenhuizen <janneke@gnu.org>
+%%%%                          Neil Puttock <n.puttock@gmail.com>
+%%%%
+%%%% LilyPond is free software: you can redistribute it and/or modify
+%%%% it under the terms of the GNU General Public License as published by
+%%%% the Free Software Foundation, either version 3 of the License, or
+%%%% (at your option) any later version.
+%%%%
+%%%% LilyPond is distributed in the hope that it will be useful,
+%%%% but WITHOUT ANY WARRANTY; without even the implied warranty of
+%%%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+%%%% GNU General Public License for more details.
+%%%%
+%%%% You should have received a copy of the GNU General Public License
+%%%% along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
+
+\version "2.16.0"
 
 \paper {
+  #(set-paper-dimension-variables (current-module))
+
   %%% WARNING
   %%%
   %%% If you add any new dimensions, don't forget to update
   pt = #(/ in 72.27)
   cm = #(* 10 mm)
 
-  print-page-number = ##t
+  % 20pt staff, 5 pt = 1.75 mm
+  output-scale = #1.7573
+
+  %% ugh. hard coded?
+  #(layout-set-absolute-staff-size (* 20.0 pt))
+
 
+  %% Automatic scaling to paper size:
   %%
-  %% 20pt staff, 5 pt = 1.75 mm
+  %% Margins, indents, and offsets marked "scaled to paper size"
+  %% below apply to the default paper format given by
+  %% (ly:get-option 'paper-size) and are scaled accordingly for
+  %% other formats.
+
+
   %%
+  %% Fixed vertical spacing
+  %%
+  top-margin-default = 5\mm     % scaled to paper-size
+  bottom-margin-default = 6\mm  % scaled to paper-size
+  ragged-bottom = ##f
+  ragged-last-bottom = ##t  % best for shorter scores
 
-  output-scale = #1.7573
+  %%
+  %% Flexible vertical spacing
+  %%
+  %% Note: these are not scaled; they are in staff-spaces.
+  system-system-spacing = #'((basic-distance . 12) (minimum-distance . 8) (padding . 1) (stretchability . 60))
+  score-system-spacing = #'((basic-distance . 14) (minimum-distance . 8) (padding . 1) (stretchability . 120))
+  markup-system-spacing = #'((basic-distance . 5) (padding . 0.5) (stretchability . 30))
+  score-markup-spacing = #'((basic-distance . 12) (padding . 0.5) (stretchability . 60))
+  markup-markup-spacing = #'((basic-distance . 1) (padding . 0.5))
+  top-system-spacing = #'((basic-distance . 1) (minimum-distance . 0) (padding . 1))
+  top-markup-spacing = #'((basic-distance . 0) (minimum-distance . 0) (padding . 1))
+  last-bottom-spacing = #'((basic-distance . 1) (minimum-distance . 0) (padding . 1) (stretchability . 30))
 
-  #(define-public book-title (marked-up-title 'bookTitleMarkup))
-  #(define-public score-title (marked-up-title 'scoreTitleMarkup))
 
   %%
-  %% ugh. hard coded?
+  %% Widths and (horizontal) margins
   %%
+  left-margin-default = 10\mm   % scaled to paper-size
+  right-margin-default = 10\mm  % scaled to paper-size
+  check-consistency = ##t
 
-  #(layout-set-absolute-staff-size (* 20.0 pt))
 
+  %%
+  %% Two-sided mode
+  %%
+  two-sided = ##f
+  inner-margin-default = 10\mm   % scaled to paper-size
+  outer-margin-default = 20\mm   % scaled to paper-size
+  binding-offset-default = 0\mm  % scaled to paper-size
 
-  #(define-public score-title-properties
-     '((is-title . #t)
-       (is-book-title . #f)))
-  #(define-public book-title-properties
-     '((is-title . #t)
-       (is-book-title . #t)))
 
-  %% Note: these are not scaled; they are in staff-spaces.
-  between-system-spacing = #'((space . 12) (minimum-distance . 8) (padding . 1))
-  between-scores-system-spacing = #'((space . 14) (minimum-distance . 8) (padding . 1))
-  after-title-spacing = #'((space . 2) (padding . 0.5))
-  before-title-spacing = #'((space . 5) (padding . 0.5))
-  between-title-spacing = #'((space . 1) (padding . 0.5))
-  top-system-spacing = #'((space . 1) (padding . 1) (min-distance . 0))
-  top-title-spacing = #'((space . 1) (padding . 1) (min-distance . 0))
-  bottom-system-spacing = #'((space . 1) (padding . 1) (min-distance . 0) (stretchability . 5))
+  %%
+  %% Indents
+  %%
+  indent-default = 15\mm       % scaled to paper-size
+  short-indent-default = 0\mm  % scaled to paper-size
 
-  ragged-bottom = ##f
 
   %%
-  %% looks best for shorter scores.
+  %% Page breaking
   %%
-  ragged-last-bottom = ##t
+  blank-after-score-page-penalty = 2
+  blank-last-page-penalty = 0
+  blank-page-penalty = 5
+  page-breaking = #ly:optimal-breaking
+
 
   %%
-  %% settings for the page breaker
+  %% Footnotes
   %%
-  blank-last-page-force = 0
-  blank-after-score-page-force = 2
-  blank-page-force = 5
+  footnote-separator-markup = \markup \fill-line { \override #'(span-factor . 1/2) \draw-hline }
+  footnote-padding = 0.5\mm
+  footnote-footer-padding = 0.5\mm
+  footnote-number-raise = 0.5\mm
+  footnote-numbering-function = #numbered-footnotes
+  reset-footnotes-on-new-page = ##t
 
   %%
-  %% To limit space between systems on a page with a lot of space left
+  %% Page numbering
   %%
-  page-limit-inter-system-space = ##f
-  page-limit-inter-system-space-factor = 1.4
+  first-page-number = #1
+  print-first-page-number = ##f
+  print-page-number = ##t
+
+  %%
+  %% Headers, footers, and titles
+  %%
+  #(define make-header (marked-up-headfoot 'oddHeaderMarkup 'evenHeaderMarkup))
+  #(define make-footer (marked-up-headfoot 'oddFooterMarkup 'evenFooterMarkup))
+
+  #(define-public book-title (marked-up-title 'bookTitleMarkup))
+  #(define-public score-title (marked-up-title 'scoreTitleMarkup))
+  #(define-public score-title-properties
+     '((is-title . #t)
+       (is-book-title . #f)))
+  #(define-public book-title-properties
+     '((is-title . #t)
+       (is-book-title . #t)))
+
+  \include "titling-init.ly"
 
-  #(define font-defaults
-     '((font-encoding . fetaMusic)))
 
   %%
-  %% the font encoding `latin1' is a dummy value for Pango fonts
+  %% Fonts
   %%
+  #(define font-defaults
+    '((font-family . feta) (font-encoding . fetaMusic)))
+
+  % `latin1' is a dummy value for Pango fonts
   #(define text-font-defaults
      `((font-encoding . latin1)
        (baseline-skip . 3)
+       (replacement-alist . ,default-string-replacement-alist)
        (word-space . 0.6)))
 
-  #(define page-breaking ly:optimal-breaking)
+  \include "text-replacements.ly"
 
-  #(define make-header (marked-up-headfoot 'oddHeaderMarkup 'evenHeaderMarkup))
-  #(define make-footer (marked-up-headfoot 'oddFooterMarkup 'evenFooterMarkup))
-  #(set-paper-dimension-variables (current-module))
-
-  \include "titling-init.ly"
-
-  top-margin = 5 \mm
-  bottom-margin = 6 \mm
-  head-separation = 4 \mm
-  foot-separation = 4 \mm
-
-  first-page-number = #1
-  print-first-page-number =##f
 }