Move Skyline_pair and Paper_system bindings into their own files.

[lilypond.git] / scm / documentation-generate.scm

diff --git a/scm/documentation-generate.scm b/scm/documentation-generate.scm
index 3d4adf09fc8aa13e92f38934a5defeba40cb32d2..874b3abbe641f1116a8888d90c908952b514be36 100644 (file)
--- a/scm/documentation-generate.scm
+++ b/scm/documentation-generate.scm
@@ -30,13 +30,17 @@
  (slot-ref (all-scheme-functions-doc) 'text)
  (open-output-file "scheme-functions.tely"))
 
-(display 
- (markup-doc-string)
- (open-output-file "markup-commands.tely"))
+;;(display 
+;; (markup-doc-string)
+;; (open-output-file "markup-commands.tely"))
 
-(display 
- (markup-list-doc-string)
- (open-output-file "markup-list-commands.tely"))
+(call-with-output-file "markup-commands.tely"
+  (lambda (port)
+    (dump-node (markup-doc-node) port 2 #t)))
+
+(call-with-output-file "markup-list-commands.tely"
+  (lambda (port)
+    (dump-node (markup-list-doc-node) port 2 #t)))
 
 (display 
  (identifiers-doc-string)
@@ -72,7 +76,23 @@
 @ifhtml
 @c ***** HTML *****
 
-@macro usermanref{NAME}
+@ifset bigpage
+
+@macro ruser{TEXT}
+@ref{\\TEXT\\,,,lilypond-big-page,Notation Reference}
+@cindex \\TEXT\\
+@end macro
+
+@macro glossaryref{TEXT}
+@vindex \\TEXT\\
+@ref{\\TEXT\\,,,music-glossary-big-page,Music Glossary}
+@end macro
+
+@end ifset
+
+@ifclear bigpage
+
+@macro ruser{NAME}
 @ref{\\NAME\\,,,lilypond}
 @cindex \\NAME\\
 @end macro
@@ -82,6 +102,8 @@
 @cindex \\NAME\\
 @end macro
 
+@end ifclear
+
 @macro inputfileref{DIR,NAME}
 @uref{source/\\DIR\\/out-www/collated-files.html#\\NAME\\,@file{\\DIR\\/\\NAME\\}}@c
 @end macro
@@ -97,7 +119,7 @@
 @ifinfo
 @c ***** info *****
 
-@macro usermanref{NAME}
+@macro ruser{NAME}
 @inforef{\\NAME\\,,,lilypond}
 @cindex \\NAME\\
 @end macro
@@ -120,7 +142,7 @@
 @iftex
 @c ***** TeX *****
 
-@macro usermanref{NAME}
+@macro ruser{NAME}
 @ref{\\NAME\\}@c
 @end macro