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

(-)a/C4/AuthoritiesMarc.pm (-1 / +2 lines)
Lines 631-637 sub AddAuthority { Link Here
631
            foreach my $subfield ( $field->subfields ) {
631
            foreach my $subfield ( $field->subfields ) {
632
                my $key = $subfield->[0];
632
                my $key = $subfield->[0];
633
                my $value = $subfield->[1];
633
                my $value = $subfield->[1];
634
                $value =~ s/^\s+|\s+$|\n+|\r+|^\t+|\t+$//g;
634
                $value =~ s/^\s+|\s+$|^\t+|\t+$|^\n+|\n+$|^\r+|\r+$//g;
635
                $value =~ s/\n+|\r+/ /g;
635
                $field->update( $key => $value );
636
                $field->update( $key => $value );
636
            }
637
            }
637
        }
638
        }
(-)a/C4/Biblio.pm (-2 / +2 lines)
Lines 2897-2903 sub ModBiblioMarc { Link Here
2897
            foreach my $subfield ( $field->subfields ) {
2897
            foreach my $subfield ( $field->subfields ) {
2898
                my $key = $subfield->[0];
2898
                my $key = $subfield->[0];
2899
                my $value = $subfield->[1];
2899
                my $value = $subfield->[1];
2900
                $value =~ s/^\s+|\s+$|\n+|\r+|^\t+|\t+$//g;
2900
                $value =~ s/^\s+|\s+$|^\t+|\t+$|^\n+|\n+$|^\r+|\r+$//g;
2901
                $value =~ s/\n+|\r+/ /g;
2901
                $field->update( $key => $value );
2902
                $field->update( $key => $value );
2902
            }
2903
            }
2903
        }
2904
        }
2904
- 

Return to bug 30358