fixed simple config load bug
This commit is contained in:
parent
42519174cd
commit
0dba3dee58
@ -71,7 +71,7 @@ sub load_config {
|
||||
my $self = shift;
|
||||
my ($config) = @_;
|
||||
|
||||
foreach my $opt_key (grep $self->{config}->has($_), keys %$config) {
|
||||
foreach my $opt_key (grep $self->{config}->has($_), @{$config->get_keys}) {
|
||||
my $value = $config->get($opt_key);
|
||||
$self->{config}->set($opt_key, $value);
|
||||
$_->set_value($opt_key, $value) for @{$self->{optgroups}};
|
||||
|
Loading…
Reference in New Issue
Block a user