From 3735b149db35169c0ec0ac0ee9ea03de01f14192 Mon Sep 17 00:00:00 2001
From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Date: Fri, 31 Jan 2025 14:10:03 +0100
Subject: [PATCH] Bug 36081: Force TestBuilder to generate a valid format value

Signed-off-by: Magnus Enger <magnus@libriotech.no>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
Signed-off-by: Alex Buckley <alexbuckley@catalyst.net.nz>
(cherry picked from commit 5ff06fd18d7b82b021caeb882d734ff45edf93d7)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
---
 t/lib/TestBuilder.pm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/t/lib/TestBuilder.pm b/t/lib/TestBuilder.pm
index a3eee8f31f..39d9695519 100644
--- a/t/lib/TestBuilder.pm
+++ b/t/lib/TestBuilder.pm
@@ -569,6 +569,12 @@ sub _gen_blob {
 sub _gen_default_values {
     my ($self) = @_;
     return {
+        ArticleRequest => {
+            format => sub {
+                my $formats = C4::Context->multivalue_preference('ArticleRequestsSupportedFormats');
+                return $formats->[ int( rand( scalar @$formats ) ) ];
+            }
+            },
         BackgroundJob => {
             context => '{}'
         },