Index: Slim/Music/Info.pm =================================================================== RCS file: /home/cvs/cvsroot/slim/server/Slim/Music/Info.pm,v retrieving revision 1.155 diff -u -p -B -r1.155 Info.pm --- Slim/Music/Info.pm 24 Nov 2004 05:39:12 -0000 1.155 +++ Slim/Music/Info.pm 24 Nov 2004 09:59:19 -0000 @@ -271,7 +273,12 @@ if (defined @Storable::EXPORT) { foreach my $file (keys %infoCache) { my $cacheEntryArray = $infoCache{$file}; - + + # delete imported playlist since we'll reconstruct them anyway + if (isPlaylistURL($file)) { + delete $infoCache{$file}; + } + # Mark all data as invalid for now $cacheEntryArray->[$validindex] = '0'; @@ -2690,6 +2698,11 @@ sub isRemoteURL { return ((shift =~ /^([a-zA-Z0-9\-]+):/) && $Slim::Player::Source::protocolHandlers{$1}); } +sub isPlaylistURL { + my $url = shift; + return (defined($url) && ($url =~ /^([a-zA-Z\-]+):/) && exists($Slim::Player::Source::protocolHandlers{$1}) && !isFileURL($url)); +} + sub isURL { return ((shift =~ /^([a-zA-Z0-9\-]+):/) && exists($Slim::Player::Source::protocolHandlers{$1})); }