Index: Plugins/ShoutcastBrowser.pm
===================================================================
RCS file: /home/cvs/cvsroot/slim/server/Plugins/ShoutcastBrowser.pm,v
retrieving revision 1.16
diff -u -p -B -r1.16 ShoutcastBrowser.pm
--- Plugins/ShoutcastBrowser.pm	7 Dec 2004 20:19:45 -0000	1.16
+++ Plugins/ShoutcastBrowser.pm	10 Dec 2004 03:59:03 -0000
@@ -150,11 +150,14 @@ my @info_index = ( 4,         2,      3,
 my $all_name = '';
 my $sort_bitrate_up = 0;
 
-my ($recent_name, $misc_genre, $position_of_recent);
+my ($recent_name, $recent_dir,$misc_genre, $position_of_recent);
 my (%recent_filename, %recent_data);
 my $recent_dirname = 'ShoutcastBrowser_Recently_Played';
-my $recent_dir = catdir(Slim::Utils::Prefs::get('playlistdir'), $recent_dirname);
-mkdir $recent_dir unless (-d $recent_dir);
+
+if (Slim::Utils::Prefs::get('playlistdir')) {
+	$recent_dir = catdir(Slim::Utils::Prefs::get('playlistdir'), $recent_dirname);
+	mkdir $recent_dir unless (-d $recent_dir);
+}
 
 my ($top_limit, $most_popular_name, $custom_genres, %custom_genres);
 
@@ -345,9 +348,7 @@ sub setMode
     $recent_name = $client->string('PLUGIN_SHOUTCASTBROWSER_RECENT');
     $most_popular_name = $client->string('PLUGIN_SHOUTCASTBROWSER_MOST_POPULAR');
     $misc_genre= $client->string('PLUGIN_SHOUTCASTBROWSER_MISC');
-    $recent_filename{$client} =
-	catfile($recent_dir,
-		$client->name() . '.m3u');
+    $recent_filename{$client} = catfile($recent_dir,$client->name() . '.m3u') if defined $recent_dir;
 
     # Get streams
     unless (@genres)