X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdocument-backend.scm;h=a8df442aa3f7cb3438784a09a537bf49e2acea7a;hb=d1514c75fb3f45f7a490ebe64a005e435a9e4493;hp=d41eabd3704a792403502a9349fc3e23a38243b5;hpb=3a9fa37e31ea68e15359a0478b359529f55cd9d7;p=lilypond.git

diff --git a/scm/document-backend.scm b/scm/document-backend.scm
index d41eabd370..a8df442aa3 100644
--- a/scm/document-backend.scm
+++ b/scm/document-backend.scm
@@ -30,21 +30,17 @@ Interfaces:
 
 (define (interface-doc-string interface grob-description)
   (let*
-      (
-       (name (car interface))
+      ((name (car interface))
        (desc (cadr interface))
        (props (sort (caddr interface) symbol<?))
        (docfunc (lambda (pr)
 		  (document-property
-		   pr 'backend grob-description )))
-       (propdocs (map docfunc props))
-       )
-    
+		   pr 'backend grob-description)))
+       (propdocs (map docfunc props)))
     (string-append
      desc
      "\n\n"
      (description-list->texi propdocs))
-
     ))