Issue 3892/1: Allow output defs as scheme expressions in toplevel, book, bookpart.

[lilypond.git] / input / regression / tie-chord.ly

diff --git a/input/regression/tie-chord.ly b/input/regression/tie-chord.ly
index d830bd01a9d98c4c3a51389ff806e9e264239b22..af3ec740a9c0f26e4216f6fd72f1c9d11b78ab5a 100644 (file)
--- a/input/regression/tie-chord.ly
+++ b/input/regression/tie-chord.ly
@@ -55,8 +55,8 @@ translate x y z to x~x y~y z~z
 
       (list ch1 ch2)))
 
-  (make-music 'SequentialMusic 'elements (apply append
-                                               (map chord->tied-chord (ly:music-property  chords 'elements)))))
+  (make-music 'SequentialMusic 'elements (append-map
+                                         chord->tied-chord (ly:music-property  chords 'elements))))
 
 baseChords =
 \applyMusic #(lambda (mus)