]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/audio-staff.cc
release: 1.5.1
[lilypond.git] / lily / audio-staff.cc
index a8d7682ce904261934e83db0d31d4efc3a1aef08..f89ebd62d4ac712602ac352231089865c28b69ef 100644 (file)
@@ -3,7 +3,7 @@
 
   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"
@@ -23,9 +23,10 @@ void
 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;
 }