The code that creates the file: internals.texi, which is found in
./scm/documentation-generate.scm and ./scm/documentation-lib.scm,
inserts the following texinfo code near the beginning of the file:
INFO-DIR-SECTION LilyPond
START-INFO-DIR-ENTRY
* GNU LilyPond Internals Reference: (internals). LilyPond Internals
Reference.
END-INFO-DIR-ENTRY
This texinfo code is incorrect as the reference '(internals)' points to a
non-existent file; it should read '(lilypond-internals)'. It is also somewhat
redundant because the main info dir section for LilyPond already contains a
menu item that points to the correct file. As far as I can tell, this incorrect
code only affects the internals.info, file so removing it will not impact any
other document.
I suggest removing this code and have attached a patch to v2.23 that does that.
This patch also removes the function texi-file-head, because it is only used to
create the code above.
If you rather I can give a patch that corrects the pointer.
Your thoughts?
Thank you,
John Wheeler
diff --git a/scm/documentation-generate.scm b/scm/documentation-generate.scm
index 05e440516b..574ba216dd 100644
--- a/scm/documentation-generate.scm
+++ b/scm/documentation-generate.scm
@@ -92,9 +92,6 @@
(writing-wip outname)
(display
- (string-append
- (texi-file-head "LilyPond Internals Reference" file-name
- "(lilypond-internals.info)")
"
@include en/macros.itexi
@@ -125,7 +122,7 @@ For LilyPond version @version{}
@contents
-@ifnottex")
+@ifnottex"
out-port)
(define top-node
diff --git a/scm/documentation-lib.scm b/scm/documentation-lib.scm
index 7e0ddc6736..54ecd46fd2 100644
--- a/scm/documentation-lib.scm
+++ b/scm/documentation-lib.scm
@@ -137,19 +137,6 @@ environment."
"\n@end ifhtml\n"
"\n@end ignore\n")))
-(define (texi-file-head name file-name top)
- (string-append
- "\\input texinfo @c -*-texinfo-*-"
- "\n@setfilename " file-name ".info"
- "\n@settitle " name
- "\n@dircategory LilyPond"
- "\n@direntry"
- ;; prepend GNU for dir, must be unique
- "\n* GNU " name ": (" file-name "). " name "."
- "\n@end direntry\n"
- "@documentlanguage en\n"
- "@documentencoding UTF-8\n"))
-
(define (context-name name)
name)
_______________________________________________
bug-lilypond mailing list
bug-lilypond@gnu.org
https://lists.gnu.org/mailman/listinfo/bug-lilypond
