43 lines
1.0 KiB
Perl
43 lines
1.0 KiB
Perl
package Plugins::YouTubeMusic::Settings;
|
|
|
|
use strict;
|
|
use base qw(Slim::Web::Settings);
|
|
|
|
use Slim::Utils::Log;
|
|
use Slim::Utils::Prefs;
|
|
|
|
my $log = logger('plugin.youtubemusic');
|
|
my $cache = Slim::Utils::Cache->new();
|
|
|
|
sub name {
|
|
return 'PLUGIN_YOUTUBEMUSIC';
|
|
}
|
|
|
|
sub page {
|
|
return 'plugins/YouTubeMusic/settings/basic.html';
|
|
}
|
|
|
|
sub prefs {
|
|
return ( preferences('plugin.youtubemusic'), qw(testPref) );
|
|
}
|
|
|
|
sub handler {
|
|
my ( $class, $client, $params ) = @_;
|
|
|
|
if ( $params->{'saveSettings'} ) {
|
|
preferences('plugin.youtubemusic')
|
|
->set( 'testPref', $params->{'pref_testPref'} );
|
|
}
|
|
|
|
Plugins::YouTubeMusic::OAuth2::getDeviceCode if $params->{get_device_code};
|
|
Plugins::YouTubeMusic::OAuth2::getToken if $params->{get_token};
|
|
|
|
$params->{user_code} = $cache->get('yt:user_code');
|
|
$params->{verification_url} = $cache->get('yt:verification_url');
|
|
$params->{access_token} = $cache->get('yt:access_token');
|
|
|
|
return $class->SUPER::handler( $client, $params );
|
|
}
|
|
|
|
1;
|