[libtype-tiny-perl] 45/46: ws;speling
Jonas Smedegaard
dr at jones.dk
Fri Sep 12 18:48:06 UTC 2014
This is an automated email from the git hooks/post-receive script.
js pushed a commit to tag 1.001_000
in repository libtype-tiny-perl.
commit 82bd85329a463b5d28f5933859294cccde43594b
Author: Toby Inkster <mail at tobyinkster.co.uk>
Date: Sun Sep 7 22:17:54 2014 +0100
ws;speling
---
lib/Type/Params.pm | 2 +-
lib/Type/Utils.pm | 2 +-
t/20-unit/Type-Params/compile-named.t | 8 ++++----
3 files changed, 6 insertions(+), 6 deletions(-)
diff --git a/lib/Type/Params.pm b/lib/Type/Params.pm
index 51cdbd4..2553d0b 100644
--- a/lib/Type/Params.pm
+++ b/lib/Type/Params.pm
@@ -423,7 +423,7 @@ __END__
=encoding utf-8
-=for stopwords evals
+=for stopwords evals invocant
=head1 NAME
diff --git a/lib/Type/Utils.pm b/lib/Type/Utils.pm
index 67d6f2a..3f6a4c4 100644
--- a/lib/Type/Utils.pm
+++ b/lib/Type/Utils.pm
@@ -481,7 +481,7 @@ sub classifier
{
my @methods = ref($assume) ? @$assume : $assume;
- for my $method (@methods)
+ for my $method (@methods)
{
$r = $self->$method(@_);
return $r if $r;
diff --git a/t/20-unit/Type-Params/compile-named.t b/t/20-unit/Type-Params/compile-named.t
index c9fce71..02e7a57 100644
--- a/t/20-unit/Type-Params/compile-named.t
+++ b/t/20-unit/Type-Params/compile-named.t
@@ -266,7 +266,7 @@ simple_test(
$Rounded = Int->plus_coercions(Num, sub { int($_) });
simple_test(
- "simple test with inlineable types, but non-inlineable coercion",
+ "simple test with inlineable types, but non-inlineable coercion",
foo => $Rounded,
bar => Int,
baz => Optional[ArrayRef->of($Rounded)],
@@ -274,7 +274,7 @@ simple_test(
$Rounded = Int->where(sub { !!1 })->plus_coercions(Num, sub { int($_) });
simple_test(
- "simple test with everything non-inlineable",
+ "simple test with everything non-inlineable",
foo => $Rounded,
bar => Int->where(sub { !!1 }),
baz => Optional[ArrayRef->of($Rounded)],
@@ -291,7 +291,7 @@ slurpy_test(
$Rounded = Int->plus_coercions(Num, sub { int($_) });
slurpy_test(
- "slurpy test with inlineable types, but non-inlineable coercion",
+ "slurpy test with inlineable types, but non-inlineable coercion",
foo => $Rounded,
bar => Int,
baz => Optional[ArrayRef->of($Rounded)],
@@ -300,7 +300,7 @@ slurpy_test(
$Rounded = Int->where(sub { !!1 })->plus_coercions(Num, sub { int($_) });
slurpy_test(
- "slurpy test with everything non-inlineable",
+ "slurpy test with everything non-inlineable",
foo => $Rounded,
bar => Int->where(sub { !!1 }),
baz => Optional[ArrayRef->of($Rounded)],
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libtype-tiny-perl.git
More information about the Pkg-perl-cvs-commits
mailing list