Arg, the dreaded equals bug.
git-svn-id: https://samskivert.googlecode.com/svn/trunk@179 6335cc39-0255-0410-8fd6-9bcaacd3b74c
This commit is contained in:
@@ -1,6 +1,6 @@
|
|||||||
#!/usr/bin/perl -w
|
#!/usr/bin/perl -w
|
||||||
#
|
#
|
||||||
# $Id: musicd,v 1.8 2001/07/13 00:16:01 mdb Exp $
|
# $Id: musicd,v 1.9 2001/07/13 00:21:32 mdb Exp $
|
||||||
#
|
#
|
||||||
# MP3 audio server. Manages playlists of mp3 files that live on a local
|
# MP3 audio server. Manages playlists of mp3 files that live on a local
|
||||||
# filesystem. The playlists can be manipulated by connecting to the server
|
# filesystem. The playlists can be manipulated by connecting to the server
|
||||||
@@ -118,7 +118,7 @@ sub handle_client
|
|||||||
my $sid = $1;
|
my $sid = $1;
|
||||||
|
|
||||||
# if we're playing the song to remove, skip to the next song
|
# if we're playing the song to remove, skip to the next song
|
||||||
if ($sid = $playing->[1]) {
|
if ($sid == $playing->[1]) {
|
||||||
play_next_tune();
|
play_next_tune();
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user