]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/document-markup.scm
Reformat some files to let emacs do its work correctly.
[lilypond.git] / scm / document-markup.scm
index 41b6f61f1baca92695c01187cce0d748016f51f7..ea335f7e2911b586c703010e44a1e7017806c8be 100644 (file)
                              "@var{" (car x) "} ("  (cadr x) ")" ))
                 (zip arg-names  sig-type-names))
            " " )))
-    
+
     (string-append
      "\n\n@item @code{\\" c-name "} " signature-str
      "\n@funindex \\" c-name "\n"
-     "\n@cindex \\" c-name "\n"    
+     "\n@cindex \\" c-name "\n"
      (if (string? doc-str)
          doc-str
          "")
 
 (define (markup-function<? a b)
   (ly:string-ci<? (symbol->string (procedure-name a)) (symbol->string (procedure-name b))))
+
 (define (markup-category-doc-node category)
   (let* ((category-string (symbol->string category))
-         (category-name (string-capitalize (regexp-substitute/global #f
-                                        "-" category-string 'pre " " 'post)))
+         (category-name (string-capitalize
+                          (regexp-substitute/global
+                            #f "-" category-string 'pre " " 'post)))
         (markup-functions (hash-fold (lambda (markup-function dummy functions)
                                       (cons markup-function functions))
                                     '()