diff options
Diffstat (limited to 't/20-modules/Type-Params/v2-named.t')
| -rw-r--r-- | t/20-modules/Type-Params/v2-named.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/t/20-modules/Type-Params/v2-named.t b/t/20-modules/Type-Params/v2-named.t index 0a50a7be..6e2a4de8 100644 --- a/t/20-modules/Type-Params/v2-named.t +++ b/t/20-modules/Type-Params/v2-named.t @@ -12,7 +12,7 @@ Toby Inkster E<lt>tobyink@cpan.orgE<gt>. =head1 COPYRIGHT AND LICENCE -This software is copyright (c) 2022 by Toby Inkster. +This software is copyright (c) 2022-2023 by Toby Inkster. This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself. @@ -80,14 +80,14 @@ is $o->myfunc2( arr => \@arr, int => 4 ), 'e', 'myfunc2 (happy path)'; { my $e = exception { - $o->myfunc( arr => \@arr, int => 6, debug => undef ); + $o->myfunc( arr => \@arr, int => 6, 'debug' ); }; like $e, qr/Wrong number of parameters/, 'myfunc (param count exception)' } { my $e = exception { - $o->myfunc2( arr => \@arr, int => 8, debug => undef ); + $o->myfunc2( arr => \@arr, int => 8, 'debug' ); }; like $e, qr/Wrong number of parameters/, 'myfunc2 (param count exception)' } |