Fix Perl deprecated code for 5.12.4 (#448)

13 years ago · 127438b8aa
parent 6269950af5
commit 127438b8aa
1 changed files with 1 additions and 1 deletions
--- a/lemonldap-ng-manager/lib/Lemonldap/NG/Manager/Uploader.pm
+++ b/lemonldap-ng-manager/lib/Lemonldap/NG/Manager/Uploader.pm
@ -804,7 +804,7 @@ sub applyConf {
    my %reloadUrls =
      %{ $self->confObj->getLocalConf( APPLYSECTION, undef, 0 ) };
    %reloadUrls = %{ $self->confObj->getConf->{reloadUrls} }
-      unless ( defined %reloadUrls );
+      unless (%reloadUrls);

    # Create user agent
    my $ua = new LWP::UserAgent( requests_redirectable => [] );