(string-append): add macro

definitions.

diff --git a/ChangeLog b/ChangeLog
index 0773decb21984d1d286ec82ad0bf00f7efe568b9..c355b0c50195cb4005f63ca9e13c33145b589eeb 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2002-10-21  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+       * scm/generate-documentation.scm (string-append): add macro
+       definitions.
+
        * lily/text-item.cc (lookup_text): don't use virtual fonts for
        normal texts.
 
@@ -127,6 +130,8 @@
        * lily/parser.yy: remove arpeggio keyword; use identifier. Idem
        for \penalty, \glissando.
 
+       * VERSION: release 1.7.3
+       
 2002-10-13  Rune Zedeler  <rune@zedeler.dk>
 
        * lily/accidental-engraver.cc: Fix

diff --git a/scm/generate-documentation.scm b/scm/generate-documentation.scm
index a33dd48494b372f9b9e26508bf2a68a842fe20fa..016d77af7aa24058c1675dbc3538310c82b77875 100644 (file)
--- a/scm/generate-documentation.scm
+++ b/scm/generate-documentation.scm
@@ -42,7 +42,38 @@
 (display
  (string-append
   "@c -*-texinfo-*-"
-  (texi-file-head "LilyPond internals" outname "(lilypond.info)")) out-port)
+  (texi-file-head "LilyPond internals" outname "(lilypond.info)")
+  "
+
+@ifhtml
+@macro usermanref{NAME}
+@uref{../lilypond/\\NAME\\.html,\\NAME\\}
+@cindex \\NAME\\
+@end macro
+@end ifhtml
+
+@ifinfo
+@macro usermanref{NAME}
+@inforef{\\NAME\\,,lilypond}
+@cindex \\NAME\\
+@end macro
+@end ifinfo
+
+@ifhtml
+@macro glossaryref{NAME}
+@uref{../music-glossary/\\NAME\\.html,\\NAME\\}
+@cindex \\NAME\\
+@end macro
+@end ifhtml
+
+@ifinfo
+@macro glossaryref{NAME}
+@inforef{\\NAME\\,,music-glossary}
+@cindex \\NAME\\
+@end macro
+@end ifinfo
+
+") out-port)
 
 (define top-node
   (make <texi-node>