new file: perform drum notes.

[lilypond.git] / ly / performer-init.ly

diff --git a/ly/performer-init.ly b/ly/performer-init.ly
index 244f0eb5e4f1b3e13ec41fa9c1032a3afbdcb501..9255018689bc8ab9e52083f997822e12fb66a842 100644 (file)
--- a/ly/performer-init.ly
+++ b/ly/performer-init.ly
@@ -16,6 +16,7 @@
 \translator {
     \StaffContext
     \name DrumStaff
+    midiInstrument = #"drums"
     \accepts DrumVoice
 }
 
@@ -30,6 +31,8 @@
 
 \translator {
     \VoiceContext
+    \remove "Note_performer"
+    \consists "Drum_note_performer" 
     \name DrumVoice
 }
 
@@ -94,13 +97,14 @@
     \accepts RhythmicStaff
     \accepts ChordNames
     \accepts FiguredBass
-
+    \accepts LyricsVoice
     \alias "Timing"
     \consists "Timing_translator"
     \consists "Swallow_performer"
     
     dynamicAbsoluteVolumeFunction = #default-dynamic-absolute-volume
     instrumentEqualizer = #default-instrument-equalizer
+    drumPitchTable = #(alist->hash-table midiDrumPitches) 
 }