More (final) docs for music expressions.

[lilypond.git] / input / test / header-ifelse.ly

diff --git a/input/test/header-ifelse.ly b/input/test/header-ifelse.ly
index 70893a7d6e4426e7c6ea34658dddc1a31d6dcde8..38a58f8622fbcd4306a9071047117c95743e79c5 100644 (file)
--- a/input/test/header-ifelse.ly
+++ b/input/test/header-ifelse.ly
@@ -1,17 +1,21 @@
-% #(define pieceTagLine "Copyright 2002 (C) Mutopia")
+\version "2.7.32"
 
-#(define (my-ly-version)
-  (let ((version (ly:version)))
-    (list (car version) (cadr version) (caddr version))))
 
 #(if (not (defined? 'pieceTagLine))
-    (define pieceTagLine (string-append "Jeremie " (numbers->string (my-ly-version)) " was here")))
+  (define pieceTagLine (string-append "Title has version " (lilypond-version))))
 
-pieceTagLine = #pieceTagLine
 \header{
-tagline = \pieceTagLine
-texidoc = "High level functionality can be accomplished with GUILE. Semantics aren't nice though." 
+    title = \pieceTagLine
+    texidoc = "
+
+High level functionality (eg. conditional defines), can be
+accomplished with GUILE.
+
+This example puts the current version in the title via Scheme.
+
+" 
 }
 
-\score{ \notes{ c4 } }
-%% new-chords-done %%
+\layout {ragged-right=##t}
+{ c'4 }
+