--- deliantra/server/ext/player-env.ext	2007/07/12 19:36:57	1.7
+++ deliantra/server/ext/player-env.ext	2007/07/23 16:53:15	1.8
@@ -25,6 +25,8 @@
       for (keys %MUSIC_QUEUE) {
          delete $MUSIC_QUEUE{$_};
 
+         cf::get_slot 0.01, -10;
+
          my $pl = cf::player::find_active $_ or next;
          $pl->ob->active or next;
          my $ns = $pl->ns or next;
@@ -77,8 +79,6 @@
             for grep $ns->must_send_face ($_), @$faces;
 
          $ns->ext_event (music => %$msg);
-
-         cf::cede_to_tick;
       }
       Coro::schedule unless %MUSIC_QUEUE;
    }