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

(-)a/C4/Record.pm (-1 / +2 lines)
Lines 411-416 sub marcrecord2csv { Link Here
411
	foreach (@marcfields) {
411
	foreach (@marcfields) {
412
412
413
	    my $field = $_->{field};
413
	    my $field = $_->{field};
414
        # Remove any blank char that might have unintentionally insered into the tag name
415
        $field =~ s/\s+//g; 
414
416
415
	    # If we have a user-supplied header, we use it
417
	    # If we have a user-supplied header, we use it
416
	    if (exists $_->{header}) {
418
	    if (exists $_->{header}) {
417
- 

Return to bug 5637