From 0af995a638561ddad6c034733c7fccdf0598d36a Mon Sep 17 00:00:00 2001
From: Fridolin Somers <fridolin.somers@biblibre.com>
Date: Fri, 7 Aug 2020 10:30:55 +0200
Subject: [PATCH] Bug 26171: adapt Koha/Exceptions.t

Signed-off-by: Victor Grousset/tuxayo <victor@tuxayo.net>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
---
 t/Koha/Exceptions.t | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/t/Koha/Exceptions.t b/t/Koha/Exceptions.t
index 13f83049ab..1a98779429 100755
--- a/t/Koha/Exceptions.t
+++ b/t/Koha/Exceptions.t
@@ -111,18 +111,19 @@ subtest 'Koha::Exceptions::Metadata tests' => sub {
 
     my $object = Test::MockObject->new;
     $object->mock( 'id', 'an_id' );
+    $object->mock( 'biblionumber', 'a_biblionumber' );
     $object->mock( 'format', 'a_format' );
     $object->mock( 'schema', 'a_schema' );
 
     throws_ok
         { Koha::Exceptions::Metadata::Invalid->throw(
-            id => 'an_id', format => 'a_format',
+            id => 'an_id', biblionumber => 'a_biblionumber', format => 'a_format',
             schema => 'a_schema', decoding_error => 'a_nasty_error' ); }
         'Koha::Exceptions::Metadata::Invalid',
         'Exception is thrown :-D';
 
     # stringify the exception
-    is( "$@", 'Invalid data, cannot decode object (id=an_id, format=a_format, schema=a_schema, decoding_error=\'a_nasty_error\')', 'Exception stringified correctly' );
+    is( "$@", 'Invalid data, cannot decode object (id=an_id, biblionumber=a_biblionumber, format=a_format, schema=a_schema, decoding_error=\'a_nasty_error\')', 'Exception stringified correctly' );
 
     throws_ok
         { Koha::Exceptions::Metadata::Invalid->throw( "Manual message exception" ) }
-- 
2.11.0