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

(-)a/C4/Acquisition.pm (-1 / +1 lines)
Lines 293-298 sub GetBasketAsCSV { Link Here
293
293
294
        my $csv = Text::CSV_XS->new({'quote_char'=>'"','escape_char'=>'"','sep_char'=>$csv_profile->csv_separator,'binary'=>1});
294
        my $csv = Text::CSV_XS->new({'quote_char'=>'"','escape_char'=>'"','sep_char'=>$csv_profile->csv_separator,'binary'=>1});
295
        my $csv_profile_content = $csv_profile->content;
295
        my $csv_profile_content = $csv_profile->content;
296
        $csv_profile_content =~ s/[\s]*//g;
296
        my ( @headers, @fields );
297
        my ( @headers, @fields );
297
        while ( $csv_profile_content =~ /
298
        while ( $csv_profile_content =~ /
298
            ([^=\|]+) # header
299
            ([^=\|]+) # header
299
- 

Return to bug 8612