http://bugs.koha.org/cgi-bin/bugzilla3/show_bug.cgi?id=3201 Summary: script missing090field.pl if record is NULL Product: Koha Version: unspecified Platform: PC OS/Version: SunOS Status: NEW Severity: enhancement Priority: P5 Component: Installation (command-line installer) AssignedTo: galen.charlton@liblime.com ReportedBy: henry@cmi.univ-mrs.fr Estimated Hours: 0.0 Change sponsored?: --- please add: $ diff -u ./misc/migration_tools/22_to_30/missing090field.pl-ori ./misc/migration_tools/22_to_30/missing090field.pl --- ./misc/migration_tools/22_to_30/missing090field.pl-ori Fri Jan 16 12:10:07 2009 +++ ./misc/migration_tools/22_to_30/missing090field.pl Thu Apr 30 12:29:51 2009 @@ -38,6 +38,8 @@ my ($tagfield2,$biblioitemtagsubfield) = &GetMarcFromKohaField("biblio.biblioitemnumber",""); my $update=0; + if (defined $record) + { my $tag = $record->field($tagfield); # warn "ICI : ".$record->as_formatted if $record->subfield('090','a') eq '11546'; @@ -63,8 +65,13 @@ $update=1; } } + } + else + { + warn "problem with :".$biblionumber." , record undefined"; + } + - if ($update){ &ModBiblioMarc($record,$biblionumber,''); print "\n modified : $biblionumber \n"; -- Configure bugmail: http://bugs.koha.org/cgi-bin/bugzilla3/userprefs.cgi?tab=email ------- You are receiving this mail because: ------- You are watching all bug changes.