tie_performer: ties_created_ variable no longer needed

[lilypond.git] / scm / define-music-types.scm

diff --git a/scm/define-music-types.scm b/scm/define-music-types.scm
index ad1073d1b36c57715e558c3408dcb69e1ff7cbeb..15fc116ac580bfa4de09ccb38b8a7c5e1dfd2b09 100644 (file)
--- a/scm/define-music-types.scm
+++ b/scm/define-music-types.scm
@@ -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)))