View | Details | Raw Unified | Return to bug 12151
Collapse All | Expand All

(-)a/tools/batchMod.pl (-2 / +1 lines)
Lines 580-586 sub UpdateMarcWith { Link Here
580
    foreach my $subfield ( $fieldfrom->subfields() ) {
580
    foreach my $subfield ( $fieldfrom->subfields() ) {
581
        foreach my $field_to_update ( @fields_to ) {
581
        foreach my $field_to_update ( @fields_to ) {
582
            if ( $subfield->[1] ) {
582
            if ( $subfield->[1] ) {
583
                unless ( $field_to_update->subfield($subfield->[0]) ~~ $subfield->[1] ) {
583
                unless ( $field_to_update->subfield($subfield->[0]) eq $subfield->[1] ) {
584
                    $modified++;
584
                    $modified++;
585
                    $field_to_update->update( $subfield->[0] => $subfield->[1] );
585
                    $field_to_update->update( $subfield->[0] => $subfield->[1] );
586
                }
586
                }
587
- 

Return to bug 12151