|
Lines 150-160
Link Here
|
| 150 |
my $all_name = ''; |
150 |
my $all_name = ''; |
| 151 |
my $sort_bitrate_up = 0; |
151 |
my $sort_bitrate_up = 0; |
| 152 |
|
152 |
|
| 153 |
my ($recent_name, $misc_genre, $position_of_recent); |
153 |
my ($recent_name, $recent_dir, $misc_genre, $position_of_recent); |
| 154 |
my (%recent_filename, %recent_data); |
154 |
my (%recent_filename, %recent_data); |
| 155 |
my $recent_dirname = 'ShoutcastBrowser_Recently_Played'; |
155 |
my $recent_dirname = 'ShoutcastBrowser_Recently_Played'; |
| 156 |
my $recent_dir = catdir(Slim::Utils::Prefs::get('playlistdir'), $recent_dirname); |
156 |
|
| 157 |
mkdir $recent_dir unless (-d $recent_dir); |
157 |
if (Slim::Utils::Prefs::get('playlistdir')) { |
|
|
158 |
$recent_dir = catdir(Slim::Utils::Prefs::get('playlistdir'), $recent_dirname); |
| 159 |
mkdir $recent_dir unless (-d $recent_dir); |
| 160 |
} |
| 158 |
|
161 |
|
| 159 |
my ($top_limit, $most_popular_name, $custom_genres, %custom_genres); |
162 |
my ($top_limit, $most_popular_name, $custom_genres, %custom_genres); |
| 160 |
|
163 |
|
|
Lines 344-352
Link Here
|
| 344 |
$recent_name = Slim::Utils::Strings::string('PLUGIN_SHOUTCASTBROWSER_RECENT'); |
347 |
$recent_name = Slim::Utils::Strings::string('PLUGIN_SHOUTCASTBROWSER_RECENT'); |
| 345 |
$most_popular_name = Slim::Utils::Strings::string('PLUGIN_SHOUTCASTBROWSER_MOST_POPULAR'); |
348 |
$most_popular_name = Slim::Utils::Strings::string('PLUGIN_SHOUTCASTBROWSER_MOST_POPULAR'); |
| 346 |
$misc_genre= Slim::Utils::Strings::string('PLUGIN_SHOUTCASTBROWSER_MISC'); |
349 |
$misc_genre= Slim::Utils::Strings::string('PLUGIN_SHOUTCASTBROWSER_MISC'); |
| 347 |
$recent_filename{$client} = |
350 |
$recent_filename{$client} = catfile($recent_dir,$client->name() . '.m3u') if defined $recent_dir; |
| 348 |
catfile($recent_dir, |
|
|
| 349 |
$client->name() . '.m3u'); |
| 350 |
|
351 |
|
| 351 |
# Get streams |
352 |
# Get streams |
| 352 |
unless (@genres) |
353 |
unless (@genres) |
