]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/audio-staff.cc
doc fixes, rune pats
[lilypond.git] / lily / audio-staff.cc
index 4a89b66555eadfb241af778393d38be03246df7e..73bb4e8ebcb85e71ef91dfa04305f454ad746473 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--2001 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c)  1997--2002 Jan Nieuwenhuizen <janneke@gnu.org>
  */
 
 #include "audio-staff.hh"
@@ -23,7 +23,8 @@ void
 Audio_staff::output (Midi_stream& midi_stream_r, int track_i)
 {
   Midi_track midi_track;
-  midi_track.number_i_ =  track_i;
+  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;