"\n@direntry"
;; prepend GNU for dir, must be unique
- "\n* GNU " name ": (" file-name "). " name "."
-+ (string-pad-right (string-append "\n* GNU " name ": (" file-name ").") 57) name
++ (string-pad-right (string-append "\n* " name ": (" top ").") 57) name
"\n@end direntry\n"
"@documentlanguage en\n"
"@documentencoding UTF-8\n"))
+--- lilypond-2.22.0/scm/documentation-generate.scm.orig 2021-01-10 15:22:46.000000000 +0100
++++ lilypond-2.22.0/scm/documentation-generate.scm 2021-04-15 20:15:29.020808775 +0200
+@@ -102,7 +102,7 @@
+ (display
+ (string-append
+ (texi-file-head "LilyPond Internals Reference" file-name
+- "(lilypond-internals.info)")
++ "lilypond-internals")
+ "
+
+ @include macros.itexi