diff options
| author | Christian Pointner <equinox@spreadspace.org> | 2015-10-03 16:10:41 (GMT) |
|---|---|---|
| committer | Christian Pointner <equinox@spreadspace.org> | 2015-10-03 17:15:48 (GMT) |
| commit | ef3f0898ee3ceb0ca36c9fc9f9174ce656a64e20 (patch) | |
| tree | 50175631668336c86bee55d038c1f39b9c8d4afd /lib/RHRD/rddb.pm | |
| parent | 5b3cfa9386c2733a399e51848782cecb99024c05 (diff) | |
fixed context read
Diffstat (limited to 'lib/RHRD/rddb.pm')
| -rwxr-xr-x | lib/RHRD/rddb.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/RHRD/rddb.pm b/lib/RHRD/rddb.pm index df9f25b..c4f7642 100755 --- a/lib/RHRD/rddb.pm +++ b/lib/RHRD/rddb.pm @@ -45,7 +45,7 @@ sub init { my %ctx; - my $cfg = Config::IniFiles->new(-file => RD_CONFIG_FILE) + my $cfg = Config::IniFiles->new(-file => RHRD_CONFIG_FILE) or return (undef , 'ERROR', "RHRD Config File Error: " . join("\n", @Config::IniFiles::errors)); $ctx{'config'}{'specialgroups'}{'system'} = $cfg->val('specialgroups', 'system', 'SYSTEM'); @@ -54,10 +54,10 @@ sub init $ctx{'config'}{'specialgroups'}{'allpools'} = $cfg->val('specialgroups', 'allpools', 'ALL_POOLS'); $ctx{'config'}{'specialgroups'}{'allingles'} = $cfg->val('specialgroups', 'alljingles', 'ALL_JINGLE'); - $ctx{'config'}{'specialusers'}{'no-update-token'} = $cfg->val('specialusers', 'no-update-token', 'admin'); - $ctx{'config'}{'specialusers'}{'admins'} = $cfg->val('specialusers', 'no-update-token', 'admin'); - $ctx{'config'}{'specialusers'}{'allshows'} = $cfg->val('specialusers', 'no-update-token', ''); - $ctx{'config'}{'specialusers'}{'allpools'} = $cfg->val('specialusers', 'no-update-token', ''); + @{$ctx{'config'}{'specialusers'}{'no-update-token'}} = split(' ', $cfg->val('specialusers', 'no-update-token', '')); + @{$ctx{'config'}{'specialusers'}{'admins'}} = split(' ', $cfg->val('specialusers', 'admins', 'admin')); + @{$ctx{'config'}{'specialusers'}{'allshows'}} = split(' ', $cfg->val('specialusers', 'allshows', '')); + @{$ctx{'config'}{'specialusers'}{'allpools'}} = split(' ', $cfg->val('specialusers', 'allpools', '')); $ctx{'config'}{'dropboxes'}{'dropbox-pseudo-station'} = $cfg->val('dropboxes', 'dropbox-pseudo-station', 'import-dropbox'); |