]> git.donarmstrong.com Git - lilypond.git/commitdiff
define-music-types.scm: Fix indentation.
authorNeil Puttock <n.puttock@gmail.com>
Fri, 18 Sep 2009 20:10:42 +0000 (21:10 +0100)
committerNeil Puttock <n.puttock@gmail.com>
Fri, 18 Sep 2009 20:10:42 +0000 (21:10 +0100)
scm/define-music-types.scm

index ad1073d1b36c57715e558c3408dcb69e1ff7cbeb..15fc116ac580bfa4de09ccb38b8a7c5e1dfd2b09 100644 (file)
@@ -691,13 +691,13 @@ and values. E.g:
 
 (define-public (make-repeated-music name)
   (let* ((repeated-music (assoc-get name '(("volta" . VoltaRepeatedMusic)
-                                  ("unfold" . UnfoldedRepeatedMusic)
-                                  ("percent" . PercentRepeatedMusic)
-                                  ("tremolo" . TremoloRepeatedMusic))))
+                                          ("unfold" . UnfoldedRepeatedMusic)
+                                          ("percent" . PercentRepeatedMusic)
+                                          ("tremolo" . TremoloRepeatedMusic))))
         (repeated-music-name (if repeated-music
-                                 repeated-music
+                                 repeated-music
                                  (begin
-                                   (ly:warning (_ "unknown repeat type `~S'") name)
-                                   (ly:warning (_ "See define-music-types.scm for supported repeats"))
-                                   'VoltaRepeatedMusic))))
+                                   (ly:warning (_ "unknown repeat type `~S'") name)
+                                   (ly:warning (_ "See define-music-types.scm for supported repeats"))
+                                   'VoltaRepeatedMusic))))
     (make-music repeated-music-name)))