--- Slim/Music/Info.pm 2004-09-17 23:35:00.000000000 -0700 +++ Info.pm 2004-09-21 13:55:06.000000000 -0700 @@ -2695,7 +2695,7 @@ sub isURL { push @protocols, ("itunesplaylist", "moodlogicplaylist", "file"); - return (defined($url) && scalar(grep { $url =~ /^$_:\/\//i } @protocols)); + return (defined($url) && scalar(grep { $url =~ /^$_:(\/\/)?/i } @protocols)); } sub isType { --- Slim/Music/iTunes.pm 2004-09-17 23:35:00.000000000 -0700 +++ iTunes.pm 2004-09-21 13:45:15.000000000 -0700 @@ -601,7 +601,7 @@ sub scanFunction { my %curPlaylist = getDict(); my %cacheEntry = (); my $name = $curPlaylist{'Name'}; - my $url = 'itunesplaylist://' . Slim::Web::HTTP::escape($name); + my $url = 'itunesplaylist:' . Slim::Web::HTTP::escape($name); $::d_itunes && msg("got a playlist ($url) named $name\n"); # add this playlist to our playlist library # 'LIST', # list items (array) --- Slim/Music/MoodLogic.pm 2004-09-17 23:35:00.000000000 -0700 +++ MoodLogic.pm 2004-09-21 13:45:07.000000000 -0700 @@ -295,7 +295,7 @@ sub exportFunction { while (defined $playlist && !$playlist->EOF) { my $name= $playlist->Fields('name')->value; my %cacheEntry = (); - my $url = 'moodlogicplaylist://' . Slim::Web::HTTP::escape($name); + my $url = 'moodlogicplaylist:' . Slim::Web::HTTP::escape($name); if (!defined($Slim::Music::Info::playlists[-1]) || $Slim::Music::Info::playlists[-1] ne $name) { $::d_moodlogic && msg("Found MoodLogic Playlist: $url\n"); } @@ -314,7 +314,7 @@ sub exportFunction { my $name= $auto->Fields('name')->value; my %cacheEntry = (); - my $url = 'moodlogicplaylist://' . Slim::Web::HTTP::escape($name); + my $url = 'moodlogicplaylist:' . Slim::Web::HTTP::escape($name); if (!defined($Slim::Music::Info::playlists[-1]) || $Slim::Music::Info::playlists[-1] ne $name) { $::d_moodlogic && msg("Found MoodLogic Auto Playlist: $url\n"); }