0
This commit is contained in:
Kaimi
2016-03-16 21:01:56 +03:00
parent d7e93a6365
commit 2516020493

View File

@@ -33,7 +33,8 @@ use constant
URL_ALBUM_REGEX => qr{music\.yandex\.\w+/album/(\d+)}is,
URL_TRACK_REGEX => qr{music\.yandex\.\w+/album/(\d+)/track/(\d+)}is,
URL_PLAYLIST_REGEX => qr{music\.yandex\.\w+/users/(.+?)/playlists/(\d+)}is,
RESPONSE_LOG_PREFIX => 'log_'
RESPONSE_LOG_PREFIX => 'log_',
TEST_URL => 'https://api.music.yandex.net/users/ya.playlist/playlists/1'
};
use constant
{
@@ -265,6 +266,18 @@ if($opt{album} || ($opt{playlist} && $opt{kind}))
{
my @track_list_info;
info(INFO, 'Checking Yandex.Music availability');
my $request = $ua->get(TEST_URL);
if($request->code == 400)
{
info(ERROR, 'Yandex.Music is not available');
}
else
{
info(OK, 'Yandex.Music is available')
}
if($opt{album})
{
info(INFO, 'Fetching album info: ' . $opt{album});
@@ -794,10 +807,11 @@ sub write_mp3_tags
while(my ($frame, $data) = each %{$mp3tags})
{
info(DEBUG, 'add_frame: ' . $frame . '=' . substr $data, 0, 16);
# Skip empty
if($data)
{
info(DEBUG, 'add_frame: ' . $frame . '=' . substr $data, 0, 16);
$mp3->{ID3v2}->add_frame
(
$frame,