diff --git a/C4/Acquisition.pm b/C4/Acquisition.pm
index 830436bcaa..bf8a215573 100644
--- a/C4/Acquisition.pm
+++ b/C4/Acquisition.pm
@@ -311,7 +311,7 @@ sub GetBasketAsCSV {
             }
             push @rows, \@row;
         }
-        my $content = join( $csv_profile->csv_separator, @headers ) . "\n";
+        my $content = join( $delimiter, @headers ) . "\n";
         for my $row ( @rows ) {
             $csv->combine(@$row);
             my $string = $csv->string;
diff --git a/serials/lateissues-export.pl b/serials/lateissues-export.pl
index de09d4c58a..af83f2c6f6 100755
--- a/serials/lateissues-export.pl
+++ b/serials/lateissues-export.pl
@@ -83,7 +83,7 @@ print $query->header(
     -attachment => "serials-claims.csv",
 );
 
-print join( $csv_profile->csv_separator, @headers ) . "\n";
+print join( $delimiter, @headers ) . "\n";
 
 for my $row ( @rows ) {
     $csv->combine(@$row);