From: Dave Rolsky <autarch@urth.org>
Date: Mon, 1 Sep 2008 14:51:49 +0000 (+0000)
Subject: Spell can't correctly
X-Git-Tag: 0.65~4
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bf3db0fbcea53d4b24fb89dff26d45d8ac94becb;p=gitmo%2FClass-MOP.git

Spell can't correctly
---

diff --git a/t/030_method.t b/t/030_method.t
index 821d49c..42ed31d 100644
--- a/t/030_method.t
+++ b/t/030_method.t
@@ -22,13 +22,13 @@ is($method->package_name, 'main', '... our package is main::');
 is($method->name, '__ANON__', '... our sub name is __ANON__');
 is($method->fully_qualified_name, 'main::__ANON__', '... our subs full name is main::__ANON__');
 
-dies_ok { Class::MOP::Method->wrap } '... cant call wrap() without some code';
-dies_ok { Class::MOP::Method->wrap([]) } '... cant call wrap() without some code';
-dies_ok { Class::MOP::Method->wrap(bless {} => 'Fail') } '... cant call wrap() without some code';
+dies_ok { Class::MOP::Method->wrap } q{... can't call wrap() without some code};
+dies_ok { Class::MOP::Method->wrap([]) } q{... can't call wrap() without some code};
+dies_ok { Class::MOP::Method->wrap(bless {} => 'Fail') } q{... can't call wrap() without some code};
 
-dies_ok { Class::MOP::Method->name } '... cant call name() with a class';
-dies_ok { Class::MOP::Method->package_name } '... cant call package_name() with a class';
-dies_ok { Class::MOP::Method->fully_qualified_name } '... cant call fully_qualified_name() with a class';
+dies_ok { Class::MOP::Method->name } q{... can't call name() with a class};
+dies_ok { Class::MOP::Method->package_name } q{... can't call package_name() with a class};
+dies_ok { Class::MOP::Method->fully_qualified_name } q{... can't call fully_qualified_name() with a class};
 
 my $meta = Class::MOP::Method->meta;
 isa_ok($meta, 'Class::MOP::Class');