@@ -, +, @@ --- t/DateUtils.t | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) --- a/t/DateUtils.t +++ a/t/DateUtils.t @@ -4,7 +4,7 @@ use DateTime::TimeZone; use C4::Context; -use Test::More tests => 80; +use Test::More tests => 81; use Test::MockModule; use Test::Warn; @@ -140,7 +140,12 @@ cmp_ok( $dt0->epoch(), 'eq', '1325455199', 'dt_from_string handles seconds with eval { $dt0 = dt_from_string( '2012-01-01T23:59:59.999Z+02:00', 'rfc3339' ); }; -like( $@, qr/.*does not match the date format \(rfc3339\).*/, 'dt_from_string should die when passed a bad date string' ); +like( $@, qr/.*does not match the date format \(rfc3339\).*/, 'dt_from_string should die when passed a bad rfc3339 date string' ); + +eval { + $dt0 = dt_from_string('2021-11-03T10:16:59+00:00', 'iso'); +}; +like( $@, qr/.*does not match the date format \(iso\).*/, 'dt_from_string should die when passed a bad iso date string' ); # ISO string tests subtest 'dt_from_string - iso format' => sub { --