Fix some bugs in the dynamic engraver and PostScript backend

[lilypond.git] / scm / document-markup.scm

diff --git a/scm/document-markup.scm b/scm/document-markup.scm
index 65f0e5e0dcfc1b9b75e30314fc0865e976f265ba..6837ba5c9d0a8354b1143db3819478b92feb036a 100644 (file)
--- a/scm/document-markup.scm
+++ b/scm/document-markup.scm
@@ -2,11 +2,11 @@
 ;;;;
 ;;;;  source file of the GNU LilyPond music typesetter
 ;;;; 
-;;;; (c)  1998--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+;;;; (c) 1998--2006 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 ;;;;                 Jan Nieuwenhuizen <janneke@gnu.org>
 
 (define (doc-markup-function func)
-  (let* ((doc-str  (procedure-documentation func) )
+  (let* ((doc-str  (procedure-documentation func))
         (f-name (symbol->string (procedure-name  func)))
         (c-name (regexp-substitute/global #f "-markup$" f-name  'pre "" 'post))
         (sig (object-property func 'markup-signature))
@@ -43,7 +43,7 @@
    (apply string-append
          
          (map doc-markup-function
-              (sort markup-function-list markup-function<?) ) )
+              (sort markup-function-list markup-function<?)))
    "\n@end table"))
 
 (define (markup-doc-node)