diff options
-rw-r--r-- | lib/Eval/TypeTiny.pm | 2 | ||||
-rw-r--r-- | lib/Type/Params/Alternatives.pm | 2 | ||||
-rw-r--r-- | lib/Type/Params/Signature.pm | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/lib/Eval/TypeTiny.pm b/lib/Eval/TypeTiny.pm index 35984b97..2dc45e26 100644 --- a/lib/Eval/TypeTiny.pm +++ b/lib/Eval/TypeTiny.pm @@ -126,7 +126,7 @@ sub type_to_coderef { my $coderef = eval_closure( source => $source, - description => $args{description} || sprintf( "type '%s'", $type->qualified_name ), + description => $args{description} || sprintf( "exportable function '%s'", $type->qualified_name ), environment => { '$type' => \$type }, ); diff --git a/lib/Type/Params/Alternatives.pm b/lib/Type/Params/Alternatives.pm index 3c70f489..cb214abd 100644 --- a/lib/Type/Params/Alternatives.pm +++ b/lib/Type/Params/Alternatives.pm @@ -92,7 +92,7 @@ sub _build_coderef { my $self = shift; my $coderef = $self->_new_code_accumulator( description => $self->base_options->{description} - || sprintf( 'parameter validation for "%s::%s"', $self->base_options->{package} || '', $self->base_options->{subname} || '__ANON__' ) + || sprintf( q{parameter validation for '%s::%s'}, $self->base_options->{package} || '', $self->base_options->{subname} || '__ANON__' ) ); $self->_coderef_start( $coderef ); diff --git a/lib/Type/Params/Signature.pm b/lib/Type/Params/Signature.pm index 9f48dbca..c5503e7b 100644 --- a/lib/Type/Params/Signature.pm +++ b/lib/Type/Params/Signature.pm @@ -290,7 +290,7 @@ sub _build_coderef { my $self = shift; my $coderef = $self->_new_code_accumulator( description => $self->description - || sprintf( 'parameter validation for "%s::%s"', $self->package || '', $self->subname || '__ANON__' ) + || sprintf( q{parameter validation for '%s::%s'}, $self->package || '', $self->subname || '__ANON__' ) ); $self->_coderef_start( $coderef ); |