]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/audio-staff.cc
release commit
[lilypond.git] / lily / audio-staff.cc
index 16fac90a30020369053bb64f6a8ade02a67f8659..f3a9e2181da3e2e73b4eaadcee4681fdae964d0b 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--1998 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c)  1997--2002 Jan Nieuwenhuizen <janneke@gnu.org>
  */
 
 #include "audio-staff.hh"
 void
 Audio_staff::add_audio_item (Audio_item* l)
 {
-  audio_item_l_list_.bottom().add (l);
+  audio_items_.push (l);
 }
 
+
 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_ = track_i;
+  midi_track.channel_ = channel_;
+  for (Midi_walker i (this, &midi_track); i.ok (); i++)
+    i.process ();
   midi_stream_r << midi_track;
 }