input/test/header-ifelse.ly

   1 % #(define pieceTagLine "Copyright 2002 (C) Mutopia")
   2
   3 #(define (my-ly-version)
   4   (let ((version (ly:version)))
   5     (list (car version) (cadr version) (caddr version))))
   6
   7 #(if (not (defined? 'pieceTagLine))
   8     (define pieceTagLine (string-append "Jeremie " (numbers->string (my-ly-version)) " was here")))
   9
  10 pieceTagLine = #pieceTagLine
  11 \header{
  12 tagline = \pieceTagLine
  13 texidoc = "High level functionality can be accomplished with GUILE. Semantics aren't nice though."
  14 }
  15
  16 \score{ \notes{ c4 } }
  17 %% new-chords-done %%