matching enhancements -- allow matching rule to be changed on the fly

[koha.git] / C4 / Matcher.pm

diff --git a/C4/Matcher.pm b/C4/Matcher.pm
index 16f42c2..505ff27 100644 (file)
--- a/C4/Matcher.pm
+++ b/C4/Matcher.pm
@@ -166,6 +166,7 @@ sub fetch {
     my $sth = $dbh->prepare_cached("SELECT * FROM marc_matchers WHERE matcher_id = ?");
     $sth->execute($id);
     my $row = $sth->fetchrow_hashref;
+    $sth->finish();
     return undef unless defined $row;
 
     my $self = {};