Added texinfo index.

[lilypond.git] / input / test / music-box.ly

diff --git a/input/test/music-box.ly b/input/test/music-box.ly
index aca2dc684f72a31d09ef18e6d5fa5bd878fde450..1ba8b58c86fd33549024e386d57bc00165124b95 100644 (file)
--- a/input/test/music-box.ly
+++ b/input/test/music-box.ly
@@ -1,13 +1,11 @@
-
-\header{
-texidoc = "This example shows prelude in C major of WTK1, but coded
-using Scheme functions to save typing work.
-"
-
-}
-
-\include "deutsch.ly"
 \version "1.7.18"
+\include "deutsch.ly"
+% possible rename to scheme- something.  -gp
+% TODO: ask if it needs to have so many empty bars in the middle.  -gp
+\header{ texidoc = "@cindex Scheme Music Box
+This example shows prelude in C major of WTK1, but coded
+using Scheme functions to avoid typing work. " }
+
 
 #(define (transform music)
   (let* ((es (ly:get-mus-property music 'elements))