From e96a0230c940b7c38fb5dbc000231cde71e06d3b Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Thu, 14 Nov 2013 14:26:23 +0100 Subject: [PATCH] Let copy-repeat-chord return the copy target for efficiency --- scm/music-functions.scm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scm/music-functions.scm b/scm/music-functions.scm index 4329e1c400..45e07d6f7a 100644 --- a/scm/music-functions.scm +++ b/scm/music-functions.scm @@ -728,7 +728,8 @@ duration is replaced with the specified @var{duration}." (set! (ly:music-property repeat-chord 'articulations) (append! (set-origin! (ly:music-deep-copy arts)) - (ly:music-property repeat-chord 'articulations)))))) + (ly:music-property repeat-chord 'articulations))))) + repeat-chord) (define-public (expand-repeat-chords! event-types music) @@ -747,8 +748,7 @@ respective predecessor chord." last-chord)) (last-chord (set! (ly:music-property music 'duration) '()) - (copy-repeat-chord last-chord music chord-repeat event-types) - music) + (copy-repeat-chord last-chord music chord-repeat event-types)) (else (ly:music-warning music (_ "Bad chord repetition")) #f))) -- 2.39.5