mirror of
https://github.com/kastdeur/bagpipe.ly.git
synced 2024-11-01 01:53:32 +01:00
a7586c1d58
Since version 2.11.45 the \pageBreak command can be used correctly at the top level, so the hack for this has been removed. Also updated the version in all files to 2.12.0 to indicate that we need a recent Lilypond.
37 lines
1.1 KiB
Text
37 lines
1.1 KiB
Text
%{
|
|
Header formatting for bagpipe tunes. Customize to get your name in the tag line.
|
|
%}
|
|
|
|
\version "2.12.0"
|
|
|
|
% Bring in the time/date package. Set format to month day, year
|
|
|
|
#(use-modules (srfi srfi-19))
|
|
today = #(date->string (current-date) "~B ~d, ~Y")
|
|
|
|
\paper {
|
|
raggedbottom = ##t
|
|
tagline = \markup {
|
|
\line {
|
|
"Rev. " \today
|
|
#(ly:export (ly:wide-char->utf-8 #x2014)) % Em-dash
|
|
"P/S Sven Axelsson, MPD"
|
|
}
|
|
}
|
|
scoreTitleMarkup = \markup {
|
|
\override #'(baseline-skip . 3)
|
|
\column {
|
|
\fill-line {
|
|
\column {
|
|
\large \bold \fromproperty #'header:title
|
|
\bold \fromproperty #'header:subtitle
|
|
}
|
|
\fromproperty #'header:meter
|
|
\line { \fromproperty #'header:composer " " \italic \fromproperty #'header:arranger }
|
|
}
|
|
#(ly:export (if (not (ly:get-option 'without-comment))
|
|
(markup #:justify-field 'header:comment)
|
|
(markup)))
|
|
}
|
|
}
|
|
}
|