From: Karen Etheridge <ether@cpan.org>
Date: Tue, 3 Oct 2017 00:41:40 +0000 (-0700)
Subject: fix test labels
X-Git-Tag: v1.000008~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b5464a067f911bfa304c0ba5bf4ddf08a333512f;p=p5sagit%2FSafe-Isa.git

fix test labels
---

diff --git a/t/safe_isa.t b/t/safe_isa.t
index 943ef17..6657722 100644
--- a/t/safe_isa.t
+++ b/t/safe_isa.t
@@ -37,7 +37,7 @@ ok(eval { is($undef->$_can('bar'), undef, 'undef can\'t bar either'); 1 }, 'and
 
 ok($foo->$_call_if_object(isa => 'Foo'), 'foo $_call_if_object(isa => Foo)');
 ok($bar->$_call_if_object(isa => 'Foo'), 'bar $_call_if_object(isa => Foo)');
-is($bar->$_call_if_object(bar => ), undef, 'bar $_call_if_object(bar => undef)');
+is($bar->$_call_if_object(bar => ), undef, 'bar $_call_if_object(bar => )');
 is($bar->$_call_if_object(bar => 2), 2, 'bar $_call_if_object(bar => 2)');
 ok(eval { is($blam->$_call_if_object(isa => 'Foo'), undef, 'blam can\'t call anything'); 1 }, 'no boom today');
 ok(eval { is($undef->$_call_if_object(isa => 'Foo'), undef, 'undef can\'t call anything'); 1 }, 'and no boom tomorrow either');
@@ -45,7 +45,7 @@ ok(eval { is($undef->$_call_if_object(isa => 'Foo'), undef, 'undef can\'t call a
 ok($foo->$_call_if_can(isa => 'Foo'), 'foo $_call_if_can(isa => Foo)');
 ok($bar->$_call_if_can(isa => 'Foo'), 'bar $_call_if_can(isa => Foo)');
 ok(eval { is($foo->$_call_if_can(bar => ), undef, 'foo can\'t call bar'); 1 }, 'no boom today');
-is($bar->$_call_if_can(bar => ), undef, 'bar $_call_if_can(bar => ');
-is($bar->$_call_if_can(bar => 2), 2, 'bar $_call_if_can(bar => 2');
+is($bar->$_call_if_can(bar => ), undef, 'bar $_call_if_can(bar => )');
+is($bar->$_call_if_can(bar => 2), 2, 'bar $_call_if_can(bar => 2)');
 ok(eval { is($blam->$_call_if_can(isa => 'Foo'), undef, 'blam can\'t call anything'); 1 }, 'no boom today');
 ok(eval { is($undef->$_call_if_can(isa => 'Foo'), undef, 'undef can\'t call anything'); 1 }, 'and no boom tomorrow either');