+(display
+ ;; ugly hack to remove the @node... @appendixsec... portion
+ (substring
+ (call-with-output-string
+ (lambda (port)
+ (dump-node (markup-doc-node) port 2)))
+ ;; magic number to remove the initial part. 63 comes from:
+ ;; "\nnode Text markup commands\n@appendixsec Text markup commands\n\n\n\n"
+ ;; which is generated by (dump-node...) in documentation-lib.scm
+ 63
+ )
+ (open-output-file "markup-commands.tely"))
+
+(display
+ (markup-list-doc-string)
+ (open-output-file "markup-list-commands.tely"))