From 79b9b1cd91486fc493a2827a36d02b2a807e4d8e Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Mon, 1 Jun 2026 15:24:44 +0200
Subject: [PATCH] Bug 42368: [24.11] Use C4::Context::csv_delimiter for
 delimiter validation

Signed-off-by: Martin Renvoize <martin.renvoize@openfifth.co.uk>
(cherry picked from commit ab36cbffc837a3e7ac7dcd501fb510ea5c7059b0)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 reports/issues_avg_stats.pl | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

diff --git a/reports/issues_avg_stats.pl b/reports/issues_avg_stats.pl
index f48c34afd1..59fdb26ae0 100755
--- a/reports/issues_avg_stats.pl
+++ b/reports/issues_avg_stats.pl
@@ -65,15 +65,7 @@ my $output         = "screen";
 my $output_input   = $input->param("output");
 my $basename       = "Export";
 my $basename_input = $input->param("basename");
-our $sep = C4::Context->csv_delimiter();
-my $sep_input = $input->param("sep");
-
-#NOTE: Validate sep parameter
-my $delimiter_choices = GetDelimiterChoices();
-my %allowed_seps      = map { $_ => 1 } @{ $delimiter_choices->{values} };
-if ( $sep_input && $allowed_seps{$sep_input} ) {
-    $sep = $sep_input;
-}
+our $sep = C4::Context->csv_delimiter( scalar $input->param("sep") );
 
 my %allowed_fields = (
     "timestamp"              => 1,