Bug 4935: fix for allowing authorized values to be "unset"

Signed-off-by: Ian Walls <ian.walls@bywatersolutions.com>
Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
This commit is contained in:
Liz Rea 2010-12-08 15:15:10 -05:00 committed by Chris Cormack
parent e29a123a9b
commit 61957d07ce

View file

@ -497,7 +497,7 @@ sub UpdateMarcWith {
my @fields_to=$marcto->field($itemtag);
foreach my $subfield ($fieldfrom->subfields()){
foreach my $field_to_update (@fields_to){
$field_to_update->update($$subfield[0]=>$$subfield[1]) if ($$subfield[1]);
$field_to_update->update($$subfield[0]=>$$subfield[1]) if ($$subfield[1] != '' or $$subfield[1] == '0');
}
}
#warn "TO edited:",$marcto->as_formatted;