[Koha-patches] [PATCH] BZ5724 follow-up missing arg to sth->execute

[paul.poulain at biblibre.com]

From: Paul Poulain <paul.poulain at biblibre.com>

(thx to Fridolyn)
---
 misc/migration_tools/rebuild_zebra.pl |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/misc/migration_tools/rebuild_zebra.pl b/misc/migration_tools/rebuild_zebra.pl
index 2bdcaa4..f125e73 100755
--- a/misc/migration_tools/rebuild_zebra.pl
+++ b/misc/migration_tools/rebuild_zebra.pl
@@ -420,7 +420,7 @@ sub get_raw_marc_record {
         if ($noxml) {
             my $fetch_sth = $dbh->prepare_cached("SELECT marc FROM biblioitems WHERE biblionumber = ?
                                                   UNION SELECT marc from deletedbiblioitems where biblionumber=?");
-            $fetch_sth->execute($record_number);
+            $fetch_sth->execute($record_number,$record_number);
             if (my ($blob) = $fetch_sth->fetchrow_array) {
                 $marc = MARC::Record->new_from_usmarc($blob);
                 $fetch_sth->finish();
-- 
1.7.1