-
Notifications
You must be signed in to change notification settings - Fork 0
/
Settings.pm
35 lines (27 loc) · 964 Bytes
/
Settings.pm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
package Plugins::SomaFM::Settings;
# Plugin to stream audio from SomaFM channels
#
# Released under the MIT Licence
# Written by Daniel Vijge
# See file LICENSE for full licence details
use strict;
use base qw(Slim::Web::Settings);
use Slim::Utils::Strings qw(string);
use Slim::Utils::Prefs;
use Slim::Utils::Log;
my $log = logger('plugin.somafm');
my $prefs = preferences('plugin.somafm');
$prefs->init({ menuLocation => 'radio', orderBy => 'popular', groupByGenre => 0, streamingQuality => 'highest:aac', descriptionInTitle => 0, secondLineText => 'description' });
# Returns the name of the plugin. The real
# string is specified in the strings.txt file.
sub name {
return 'PLUGIN_SOMAFM';
}
sub page {
return 'plugins/SomaFM/settings/basic.html';
}
sub prefs {
return (preferences('plugin.somafm'), qw(menuLocation orderBy groupByGenre streamingQuality descriptionInTitle secondLineText));
}
# Always end with a 1 to make Perl happy
1;