Merge remote-tracking branch 'origin/new/bug_7143'

[koha_fer] / misc / migration_tools / fix_onloan.pl

diff --git a/misc/migration_tools/fix_onloan.pl b/misc/migration_tools/fix_onloan.pl
index 1dc5246..d6e63af 100755 (executable)
--- a/misc/migration_tools/fix_onloan.pl
+++ b/misc/migration_tools/fix_onloan.pl
@@ -1,6 +1,7 @@
 #!/usr/bin/perl
 
 use strict;
+#use warnings; FIXME - Bug 2505
 use  C4::Context;
 use C4::Items;
 use C4::Biblio;
@@ -24,4 +25,4 @@ $|=1;
 while (my ($biblionumber,$itemnumber,$onloan)= $rqbiblios->fetchrow){
     ModItem({onloan => "$onloan"}, $biblionumber, $itemnumber);
     print "Onloan : $onloan for $biblionumber / $itemnumber\n";
-}
\ No newline at end of file
+}