From: Matt S Trout <matthewt@hercule.scsys.co.uk>
Date: Tue, 16 Nov 2010 00:56:47 +0000 (+0000)
Subject: fix up tests to new calling convention
X-Git-Tag: 0.009001~4
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c4fd8838d160a75dd495ed357ca50bfc4aedfd70;p=gitmo%2FMoo.git

fix up tests to new calling convention
---

diff --git a/t/role-tiny.t b/t/role-tiny.t
index 254e62b..69ee7ef 100644
--- a/t/role-tiny.t
+++ b/t/role-tiny.t
@@ -65,8 +65,8 @@ like(try_apply_to('NoMethods'), qr/req1, req2/, 'error for both methods');
 like(try_apply_to('OneMethod'), qr/req2/, 'error for one method');
 
 is exception {
-  Role::Tiny->apply_role_to_package('MyRole', 'IntermediaryRole');
-  Role::Tiny->apply_role_to_package('IntermediaryRole', 'ExtraClass');
+  Role::Tiny->apply_role_to_package('IntermediaryRole', 'MyRole');
+  Role::Tiny->apply_role_to_package('ExtraClass', 'IntermediaryRole');
 }, undef, 'No errors applying roles';
 
 ok(ExtraClass->does('MyRole'), 'ExtraClass does MyRole');