Skip to content

Commit

Permalink
Small formatting tweaks
Browse files Browse the repository at this point in the history
  • Loading branch information
autarch committed Oct 26, 2012
1 parent b75c091 commit 52c003d
Showing 1 changed file with 10 additions and 8 deletions.
18 changes: 10 additions & 8 deletions t/33-keep-errsv.t
Expand Up @@ -5,17 +5,19 @@ use Params::Validate qw( validate SCALAR );

use Test::More;

$@ = 'foo';
v( bar => "doz" );
{
$@ = 'foo';
v1 ( bar => 42 );

is(
$@,
'foo',
'calling validate() does not clobber'
);
is(
$@,
'foo',
'calling validate() does not clobber'
);
}

done_testing();

sub v {
sub v1 {
validate( @_, { bar => { type => SCALAR } } );
}

0 comments on commit 52c003d

Please sign in to comment.