Remove warning 'Use of uninitialized value' when using zeroconf (#1030)

This commit is contained in:
Clément Oudot 2016-06-06 09:09:29 +00:00
parent 901de510b4
commit 4d4d5aeb2b

View File

@ -687,7 +687,7 @@ sub metadatas {
my $id = -1;
my ($ind) = map { $id++; $_ == $res->{cfgNum} ? ($id) : () } @a;
if ($ind) { $res->{prev} = $a[ $ind - 1 ]; }
if ( $ind < $#a ) { $res->{next} = $a[ $ind + 1 ]; }
if ( $ind and $ind < $#a ) { $res->{next} = $a[ $ind + 1 ]; }
$self->userNotice( 'User '
. $self->userId($req)
. ' ask for configuration metadatas ('