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

(-)a/Koha/MetadataRecord.pm (-2 / +1 lines)
Lines 125-131 sub stripWhitespaceChars { Link Here
125
                my $key = $subfield->[0];
125
                my $key = $subfield->[0];
126
                my $value = $subfield->[1];
126
                my $value = $subfield->[1];
127
                $value =~ s/[\n\r]+/ /g;
127
                $value =~ s/[\n\r]+/ /g;
128
                $value =~ s/^\s+|\s+$|^\t+|\t+$//g;
128
                $value =~ s/^\s+|\s+$//g;
129
                $field->add_subfields( $key => $value ); # add subfield to the end of the subfield list
129
                $field->add_subfields( $key => $value ); # add subfield to the end of the subfield list
130
                $field->delete_subfield( pos => 0 ); # delete the subfield at the top of the subfield list
130
                $field->delete_subfield( pos => 0 ); # delete the subfield at the top of the subfield list
131
            }
131
            }
132
- 

Return to bug 30358