From 4738c233b2e832dd6445bba189ba5b7d4f457435 Mon Sep 17 00:00:00 2001 From: Alexandre Morignot <erdnaxeli@cervoi.se> Date: Sun, 15 Mar 2015 20:27:47 +0100 Subject: [PATCH] delete hash entries instead of undef them --- lib/utils/db/query.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/utils/db/query.pm b/lib/utils/db/query.pm index 633d7a8..6361ef4 100644 --- a/lib/utils/db/query.pm +++ b/lib/utils/db/query.pm @@ -73,11 +73,11 @@ sub _get_next { # we come here only if there is no more data to fetch # we take care of the db - $self->_sth->{$chan} = undef; + delete $self->_sth->{$chan}; $self->_get_dbh($chan)->commit(); # we remove the query - $self->_queries->{$chan} = undef; + delete $self->_queries->{$chan}; return undef; } -- GitLab