From: Neil Puttock <n.puttock@gmail.com> Date: Fri, 18 Sep 2009 20:10:42 +0000 (+0100) Subject: define-music-types.scm: Fix indentation. X-Git-Tag: release/2.13.4-1~16 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=553f6aa21a21d0ba7ae3ee48bce121154590bf8b;p=lilypond.git define-music-types.scm: Fix indentation. --- diff --git a/scm/define-music-types.scm b/scm/define-music-types.scm index ad1073d1b3..15fc116ac5 100644 --- 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)))