From: David Kastrup <dak@gnu.org>
Date: Fri, 10 Apr 2015 18:36:32 +0000 (+0200)
Subject: Issue 4343: quoteDuring music should be sent to midi file
X-Git-Tag: release/2.19.19-1~11
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=237343567335e54017c40545dc2e20fb3eca50fa;p=lilypond.git

Issue 4343: quoteDuring music should be sent to midi file
---

diff --git a/ly/performer-init.ly b/ly/performer-init.ly
index 09abc727ba..1c2f45da8b 100644
--- a/ly/performer-init.ly
+++ b/ly/performer-init.ly
@@ -283,6 +283,14 @@
   dynamicAbsoluteVolumeFunction = #default-dynamic-absolute-volume
   instrumentEqualizer = #default-instrument-equalizer
   drumPitchTable = #(alist->hash-table midiDrumPitches)
+
+  %% \quoteDuring is supposed to quote everything but we don't admit
+  %% cue events by default in order not to get multiple midi
+  %% renditions in an orchestral score.
+
+  quotedEventTypes = #'(StreamEvent)
+  quotedCueEventTypes = #'()
+
   timing = ##t
 }