[Koha-patches] [PATCH] Adding some error proof on GetMarcRecord
Henri-Damien LAURENT
henridamien.laurent at biblibre.com
Wed Aug 26 01:44:21 CEST 2009
---
.../22_to_30/rebuild_unimarc_100.pl | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl b/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl
index 60b1b87..1ef4049 100755
--- a/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl
+++ b/misc/migration_tools/22_to_30/rebuild_unimarc_100.pl
@@ -30,7 +30,7 @@ while (my ($biblionumber,$time)=$sth->fetchrow ){
# print "record : $biblionumber \n";
my $record = GetMarcBiblio($biblionumber);
# print "=> ".$record->as_formatted;
- MARCmodrecord($biblionumber,$record,$time);
+ MARCmodrecord($biblionumber,$record,$time) if ($record);
#
}
--
1.6.0.4
More information about the Koha-patches
mailing list