]> git.donarmstrong.com Git - lilypond.git/blob - input/test/header-ifelse.ly
7a2029edcd97e0a9f5a15c77f48eda7db8890ddf
[lilypond.git] / input / test / header-ifelse.ly
1 \version "1.9.8"
2
3
4 #(define (my-ly-version)
5     (list-head (ly:version) 3))
6
7 #(if (not (defined? 'pieceTagLine))
8     (define pieceTagLine (string-append "Jeremie " (numbers->string (my-ly-version)) " was here")))
9
10 \header{
11 tagline = \pieceTagLine
12 texidoc = "
13
14 High level functionality (eg. conditional defines),
15 can be accomplished with GUILE.
16
17 This example puts the current version in the tagline via Scheme.
18 Since the tagline isn't used in creating the webpage, this example
19 doesn't output anything unusual in the collated snippets.
20
21
22 }
23
24 \score{ \notes{ c'4 }
25 \paper {raggedright=##t}
26 }
27