diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm index 09cb39ced2..738fe1661e 100644 --- a/C4/Acquisition.pm +++ b/C4/Acquisition.pm @@ -241,6 +241,8 @@ sub GetBasketAsCSV { my @rows; foreach my $order (@orders) { my @cols; + # newlines are not valid characters for Text::CSV combine() + $order->{'notes'} =~ s/[\r\n]+//g; push(@cols, $contract->{'contractname'}, $order->{'ordernumber'},