diff options
| author | Angelo Naselli <anaselli@linux.it> | 2014-09-04 23:35:09 +0200 |
|---|---|---|
| committer | Angelo Naselli <anaselli@linux.it> | 2014-09-04 23:35:09 +0200 |
| commit | 79e89c19b53055fb0b95c541d6191b07a4e59e22 (patch) | |
| tree | e0ae004b09b2bc39fd6458b98afed892c1dd6626 /lib | |
| parent | 791f736950dd63ff239e7fd743f4675ccb9c865f (diff) | |
| download | colin-keep-79e89c19b53055fb0b95c541d6191b07a4e59e22.tar colin-keep-79e89c19b53055fb0b95c541d6191b07a4e59e22.tar.gz colin-keep-79e89c19b53055fb0b95c541d6191b07a4e59e22.tar.bz2 colin-keep-79e89c19b53055fb0b95c541d6191b07a4e59e22.tar.xz colin-keep-79e89c19b53055fb0b95c541d6191b07a4e59e22.zip | |
fixed experimental warning for hash ref access
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/AdminPanel/Shared/Hosts.pm | 2 | ||||
| -rw-r--r-- | lib/AdminPanel/Shared/TimeZone.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/lib/AdminPanel/Shared/Hosts.pm b/lib/AdminPanel/Shared/Hosts.pm index c3ce6ee..9eed5b6 100644 --- a/lib/AdminPanel/Shared/Hosts.pm +++ b/lib/AdminPanel/Shared/Hosts.pm @@ -61,7 +61,7 @@ sub _getHosts { # $self->configHosts(Config::Hosts->new()); my $hosts = $self->configHosts->read_hosts(); my @result = (); - while( my ($key, $value) = each($hosts)){ + while( my ($key, $value) = each(%{$hosts})){ if($self->configHosts->determine_ip_or_host($key) == $is_ip){ my $tmp = {}; $tmp = $self->configHosts->query_host($key); diff --git a/lib/AdminPanel/Shared/TimeZone.pm b/lib/AdminPanel/Shared/TimeZone.pm index a7aac1c..969df94 100644 --- a/lib/AdminPanel/Shared/TimeZone.pm +++ b/lib/AdminPanel/Shared/TimeZone.pm @@ -461,7 +461,7 @@ sub _get_ntp_server_tree { $self->loc->N($zone) . "|" . $self->loc->N($_) ), $self->_get_ntp_server_tree($_) - } keys $ns; + } keys %{$ns}; } #============================================================= |