TT#33651 suppress warnings about undefined values

Reported at http://lists.sipwise.com/pipermail/spce-user_lists.sipwise.com/2019-December/014013.html

This can happen if the check for $data_ok above fails. The key will
still be present in %$keys but will be missing from %vals.

Change-Id: Ic8124c46c32f3f9cd59ff4d005866beb6e80547a
changes/27/36527/1
Richard Fuchs 6 years ago
parent 2d47f25e28
commit 597d341578

@ -745,9 +745,9 @@ SQL
my $meth = $vals{$key}->{meth};
# delete from cid map
$redis->srem("acc:cid::$cid", $key);
$redis->srem("acc:cid::$cid", $key) if defined $cid;
# delete from meth map
$redis->srem("acc:meth::$meth", $key);
$redis->srem("acc:meth::$meth", $key) if defined $meth;
}
} else {
$self->error("insert into mysql: ".$DBI::errstr) if $DBI::err;

Loading…
Cancel
Save