Remove `* lilypond' node from

direntry, so that `info lilypond' goes to Top.

diff --git a/ChangeLog b/ChangeLog
index 6a562d0e59b3ce7bb6674ec988841c79338b9b89..8150386abe1ec38a73d0c569f7b89a1028f98bcf 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2004-03-19  Jan Nieuwenhuizen  <janneke@gnu.org>
 
+       * Documentation/user/lilypond.tely: Remove `* lilypond' node from
+       direntry, so that `info lilypond' goes to Top.
+
        * scm/output-ps.scm (polygon): Fix: add spaces.
 
        * scm/page-layout.scm (ly:optimal-page-breaks): Bugfix: underful

diff --git a/Documentation/user/lilypond.tely b/Documentation/user/lilypond.tely
index f691a0c570a1b68eabeaf71c98418bb96e8f118d..2e2e63b75e7052d0218b68e8ebad98e2674b78c0 100644 (file)
--- a/Documentation/user/lilypond.tely
+++ b/Documentation/user/lilypond.tely
@@ -15,11 +15,10 @@ Distributions will want to install lilypond.info in postinstall, doing:
 @dircategory GNU music project
 @direntry
 @c  prepend GNU for dir, must be unique
-@c  `info lilypond' brings up node Invoking LilyPond (WL)
-@c  that is because the node name is an exact match. --jcn
-@c  we could try to think of another node name...
+@c  do not list the `lilypond' node at toplevel, so that `info lilypond'
+@c  goes to Top.
+@c  * lilypond: (lilypond/lilypond)Invoking LilyPond.      Titling LilyPond scores.
 * GNU LilyPond: (lilypond/lilypond).           The GNU music typesetter.
-* lilypond: (lilypond/lilypond)Invoking LilyPond.      Titling LilyPond scores.
 * Glossary: (lilypond/music-glossary).                  Glossary of music terms.
 * convert-ly: (lilypond/lilypond)Invoking convert-ly.  Older LilyPond versions.
 * midi2ly: (lilypond/lilypond)Invoking midi2ly.        Importing MIDI.

diff --git a/input/test/header-ifelse.ly b/input/test/header-ifelse.ly
index afe77221de9669f8b62ff59578a72b47fccbca1e..f472e8e97687ceb0be02933a8b5a0bdaa129983d 100644 (file)
--- a/input/test/header-ifelse.ly
+++ b/input/test/header-ifelse.ly
@@ -5,7 +5,7 @@
     (list-head (ly:version) 3))
 
 #(if (not (defined? 'pieceTagLine))
-    (define pieceTagLine (string-append "Jeremie " (numbers->string (my-ly-version)) " was here")))
+    (define pieceTagLine (string-append "Jeremie " (ly:numbers->string (my-ly-version)) " was here")))
 
 \header{
 tagline = \pieceTagLine