source file of the GNU LilyPond music typesetter
- (c) 1997--1999 Jan Nieuwenhuizen <janneke@gnu.org>
+ (c) 1997--2001 Jan Nieuwenhuizen <janneke@gnu.org>
*/
#include "audio-staff.hh"
Audio_staff::output (Midi_stream& midi_stream_r, int track_i)
{
Midi_track midi_track;
- midi_track.number_i_ = track_i;
- for (Midi_walker i (this, &midi_track); i.ok(); i++)
- i.process();
+ midi_track.number_i_ = track_i;
+ midi_track.channel_i_ = channel_i_;
+ for (Midi_walker i (this, &midi_track); i.ok (); i++)
+ i.process ();
midi_stream_r << midi_track;
}