diff --git a/t/lib/TestBuilder.pm b/t/lib/TestBuilder.pm index a0490c6531..9f1dcece99 100644 --- a/t/lib/TestBuilder.pm +++ b/t/lib/TestBuilder.pm @@ -610,6 +610,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 ) ) ]; + } + }, AuthorisedValueCategory => { is_integer_only => 0, },