Index: /home/mh/eclipse/SVN/Slim/Utils/Scan.pm
===================================================================
--- /home/mh/eclipse/SVN/Slim/Utils/Scan.pm	(revision 3148)
+++ /home/mh/eclipse/SVN/Slim/Utils/Scan.pm	(working copy)
@@ -665,6 +665,10 @@
 		$::d_scan && msg("Scan::readList loading $playlisturl with base $playlist_base\n");
 		$numitems = (push @$listref, Slim::Formats::Parse::parseList($playlisturl, $playlist_filehandle, $playlist_base)) - $startingsize;
 					
+		if (ref($playlist_filehandle) eq 'IO::String') {
+			untie $playlist_filehandle;
+		}
+
 		$::d_scan && msg("Scan::readList loaded playlist with $numitems items\n");
 	}
 
Index: /home/mh/eclipse/SVN/Slim/Formats/Parse.pm
===================================================================
--- /home/mh/eclipse/SVN/Slim/Formats/Parse.pm	(revision 3148)
+++ /home/mh/eclipse/SVN/Slim/Formats/Parse.pm	(working copy)
@@ -234,7 +234,7 @@
 		push @items, $entry;
 	}
 
-	close $pls;
+	close $pls if (ref($pls) ne 'IO::String');
 
 	return @items;
 }