input/test/header-ifelse.ly

   1 % #(define pieceTagLine "Copyright 2002 (C) Mutopia")
   2 \version "1.7.20"
   3 % FIXME: since tagline isn't used in creating the webpage, this example
   4 % doesn't output anything unusual.
   5
   6 #(define (my-ly-version)
   7   (let ((version (ly:version)))
   8     (list (car version) (cadr version) (caddr version))))
   9
  10 #(if (not (defined? 'pieceTagLine))
  11     (define pieceTagLine (string-append "Jeremie " (numbers->string (my-ly-version)) " was here")))
  12
  13 pieceTagLine = #pieceTagLine
  14 \header{
  15 tagline = \pieceTagLine
  16 texidoc = "@cindex Header If Else
  17 High level functionality can be accomplished with GUILE. Semantics aren't nice though."
  18 }
  19
  20 \score{ \notes{ c4 }
  21 \paper {raggedright=##t}
  22 }
  23 %% new-chords-done %%