Docs: Move the @top node before the first content line

texi2html switched to not printing the Top node at the very beginning
any more, but rather at the spot where it really appears in the .tely
file. If there is some content before the @top node, that content
will appear before the headline in the .html file.

diff --git a/Documentation/user/lilypond-learning.tely b/Documentation/user/lilypond-learning.tely
index ea074f5c8a7e3605bfa48f9836ef86680c9ca3df..602845573735aa49aad31d167c8bb774d4e27f54 100644 (file)
--- a/Documentation/user/lilypond-learning.tely
+++ b/Documentation/user/lilypond-learning.tely
@@ -31,6 +31,11 @@
 @omflanguage English
 @end ignore
 
+@ifnottex
+@node Top
+@top GNU LilyPond --- Learning Manual
+@end ifnottex
+
 
 @ifhtml
 This document is also available as a
@@ -98,9 +103,6 @@ Free Documentation License''.
 @end ifnottex
 
 @ifnottex
-@node Top
-@top GNU LilyPond --- Learning Manual
-
 This is the Learning Manual (LM) for GNU LilyPond version @version{}.
 For more information about how this fits with the other
 documentation, see @ref{About the documentation}.

diff --git a/Documentation/user/lilypond-program.tely b/Documentation/user/lilypond-program.tely
index b1d8fe1f841f34b8bccaea2d7f0f1e7f174b65bc..b1dacf2e498b4e9d91a5bd34b7c136c1914db480 100644 (file)
--- a/Documentation/user/lilypond-program.tely
+++ b/Documentation/user/lilypond-program.tely
@@ -32,6 +32,12 @@
 @end ignore
 
 
+@ifnottex
+@node Top
+@top GNU LilyPond --- Application Usage
+@c HJJ: Info needs `@top', which is a synonym for `@unnumbered' in TeX.
+@end ifnottex
+
 @ifhtml
 This document is also available as a
 @uref{source/Documentation/user/lilypond-program.pdf,PDF} and as
@@ -98,10 +104,6 @@ Free Documentation License''.
 @end ifnottex
 
 @ifnottex
-@node Top
-@top GNU LilyPond --- Application Usage
-@c HJJ: Info needs `@top', which is a synonym for `@unnumbered' in TeX.
-
 This is the Application Usage (AU) manual for GNU LilyPond version @version{}.
 For more information about how this fits with the other
 documentation, see @rlearning{About the documentation}.

diff --git a/Documentation/user/lilypond.tely b/Documentation/user/lilypond.tely
index 943d09632ef6db24b3519062a9eee31e74b85248..f6d4c1b6cfe7357b5a25cf0cac2b791e98ede6d1 100644 (file)
--- a/Documentation/user/lilypond.tely
+++ b/Documentation/user/lilypond.tely
@@ -66,6 +66,13 @@ Distributions will want to install lilypond.info in postinstall, doing:
 @omflanguage English
 @end ignore
 
+@ifnottex
+@node Top
+@top GNU LilyPond --- Notation Reference
+@chapheading The music typesetter
+@c HJJ: Info needs `@top', which is a synonym for `@unnumbered' in TeX.
+@end ifnottex
+
 
 @ifhtml
 This document is also available as a
@@ -132,11 +139,6 @@ Free Documentation License''.
 @end ifnottex
 
 @ifnottex
-@node Top
-@top GNU LilyPond --- Notation Reference
-@titlefont The music typesetter
-@c HJJ: Info needs `@top', which is a synonym for `@unnumbered' in TeX.
-
 This is the Notation Reference (NR) for GNU LilyPond version @version{}.
 For more information about how this fits with the other
 documentation, see @rlearning{About the documentation}.

diff --git a/Documentation/user/music-glossary.tely b/Documentation/user/music-glossary.tely
index a4a8afd309cc56947971de94b37cf335edbfaa94..de41a6dcd96412cdf0560e58e58b401866e5bb17 100644 (file)
--- a/Documentation/user/music-glossary.tely
+++ b/Documentation/user/music-glossary.tely
@@ -14,6 +14,12 @@
 * Glossary: (lilypond/music-glossary).  Glossary of music terms.
 @end direntry
 
+@ifnottex
+@node Top
+@top Music Glossary
+@end ifnottex
+
+
 @ifhtml
 This document is also available in
 @uref{source/Documentation/user/music-glossary.pdf,PDF}
@@ -58,11 +64,6 @@ Copyright @copyright{} 1999--2007 by the authors
 @omflanguage English
 @end ignore
 
-@ifnottex
-@node Top
-@top Music Glossary
-@end ifnottex
-
 
 @ifnottex
 

diff --git a/scm/documentation-generate.scm b/scm/documentation-generate.scm
index e486e04f9e103ea018d4938617c5817772bd6206..6158fbb21c1b2771262520584cfa5adcc282ff69 100644 (file)
--- a/scm/documentation-generate.scm
+++ b/scm/documentation-generate.scm
@@ -90,12 +90,6 @@
 @end tex
 @end iftex
 
-@ifhtml
-This document is also available as a
-@uref{source/Documentation/user/lilypond-internals.pdf,PDF} and as
-@uref{source/Documentation/user/lilypond-internals-big-page.html,one big page}.
-@end ifhtml
-
 @finalout
 
 @titlepage
@@ -113,16 +107,21 @@ For LilyPond version @version{}
 
 @contents
 
-@ifnottex
-")
+@ifnottex")
  out-port)
 
 (define top-node
   (make <texi-node>
     #:name "GNU LilyPond -- Internals Reference"
     #:text
-    (string-append  "
-@end ifnottex
+    (string-append  "@end ifnottex
+
+@ifhtml
+This document is also available as a
+@uref{source/Documentation/user/lilypond-internals.pdf,PDF} and as
+@uref{source/Documentation/user/lilypond-internals-big-page.html,one big page}.
+@end ifhtml
+
 This is the Internals Reference (IR) for version "
                    (lilypond-version)
                    " of LilyPond, the GNU music typesetter.")