[Moose-commits] r7136 - in Mouse/trunk: . t t/lib

[sartak at code2.0beta.co.uk]

Author: sartak
Date: 2008-12-21 14:48:42 -0800 (Sun, 21 Dec 2008)
New Revision: 7136

Modified:
   Mouse/trunk/
   Mouse/trunk/t/005-extends.t
   Mouse/trunk/t/020-load-class.t
   Mouse/trunk/t/lib/SyntaxError.pm
   Mouse/trunk/t/lib/Unsweetened.pm
Log:
 r77715 at onn:  sartak | 2008-12-21 17:47:39 -0500
 Finish renaming these test modules



Property changes on: Mouse/trunk
___________________________________________________________________
Name: svk:merge
   - 08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse:77714
08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse-trunk:61565
3efe9002-19ed-0310-8735-a98156148065:/Mouse/branches/shika-based:6997
   + 08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse:77715
08e7d58d-de06-4458-8c15-335e402ab116:/local/Mouse-trunk:61565
3efe9002-19ed-0310-8735-a98156148065:/Mouse/branches/shika-based:6997

Modified: Mouse/trunk/t/005-extends.t
===================================================================
--- Mouse/trunk/t/005-extends.t	2008-12-21 22:48:31 UTC (rev 7135)
+++ Mouse/trunk/t/005-extends.t	2008-12-21 22:48:42 UTC (rev 7136)
@@ -14,7 +14,7 @@
 
     package Mouse::TestClass;
     use Mouse;
-    extends 'Anti::Mouse';
+    extends 'Unsweetened';
 
     sub mouse { 1 }
 };
@@ -27,7 +27,7 @@
 isa_ok($child => 'Class');
 isa_ok($child => 'Mouse::Object');
 
-can_ok('Mouse::TestClass' => qw(mouse antimouse));
+can_ok('Mouse::TestClass' => qw(mouse unsweetened));
 
 eval "
     package Child;

Modified: Mouse/trunk/t/020-load-class.t
===================================================================
--- Mouse/trunk/t/020-load-class.t	2008-12-21 22:48:31 UTC (rev 7135)
+++ Mouse/trunk/t/020-load-class.t	2008-12-21 22:48:42 UTC (rev 7136)
@@ -15,8 +15,8 @@
 throws_ok { Mouse::load_class('')     } qr/Invalid class name \(\)/;
 throws_ok { Mouse::load_class(\"foo") } qr/Invalid class name \(SCALAR\(\w+\)\)/;
 
-ok(Mouse::load_class('Anti::Mouse'));
-can_ok('Anti::Mouse' => 'antimouse');
+ok(Mouse::load_class('Unsweetened'));
+can_ok('Unsweetened' => 'unsweetened');
 
 do {
     package Class;
@@ -30,6 +30,6 @@
 } qr/Can't locate /;
 
 throws_ok {
-    Mouse::load_class('Anti::MouseError');
+    Mouse::load_class('SyntaxError');
 } qr/Missing right curly/;
 

Modified: Mouse/trunk/t/lib/SyntaxError.pm
===================================================================
--- Mouse/trunk/t/lib/SyntaxError.pm	2008-12-21 22:48:31 UTC (rev 7135)
+++ Mouse/trunk/t/lib/SyntaxError.pm	2008-12-21 22:48:42 UTC (rev 7136)
@@ -1,11 +1,5 @@
-#!/usr/bin/env perl
-package Anti::MouseError;
-use strict;
-use warnings;
+package SyntaxError;
 
 # this syntax error is intentional!
-
     {
 
-1;
-

Modified: Mouse/trunk/t/lib/Unsweetened.pm
===================================================================
--- Mouse/trunk/t/lib/Unsweetened.pm	2008-12-21 22:48:31 UTC (rev 7135)
+++ Mouse/trunk/t/lib/Unsweetened.pm	2008-12-21 22:48:42 UTC (rev 7136)
@@ -1,9 +1,8 @@
-#!/usr/bin/env perl
-package Anti::Mouse;
+package Unsweetened;
 use strict;
 use warnings;
 
-sub antimouse { 1 }
+sub unsweetened { 1 }
 
 1;