Finish renaming these test modules
Shawn M Moore [Sun, 21 Dec 2008 22:48:42 +0000 (22:48 +0000)]
t/005-extends.t
t/020-load-class.t
t/lib/SyntaxError.pm
t/lib/Unsweetened.pm

index d3d6af1..31d7d24 100644 (file)
@@ -14,7 +14,7 @@ do {
 
     package Mouse::TestClass;
     use Mouse;
-    extends 'Anti::Mouse';
+    extends 'Unsweetened';
 
     sub mouse { 1 }
 };
@@ -27,7 +27,7 @@ isa_ok($child => 'Child');
 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;
index d115db7..705c0db 100644 (file)
@@ -15,8 +15,8 @@ throws_ok { Mouse::load_class()       } qr/Invalid class name \(undef\)/;
 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 @@ throws_ok {
 } qr/Can't locate /;
 
 throws_ok {
-    Mouse::load_class('Anti::MouseError');
+    Mouse::load_class('SyntaxError');
 } qr/Missing right curly/;
 
index 6832406..91d6768 100644 (file)
@@ -1,11 +1,5 @@
-#!/usr/bin/env perl
-package Anti::MouseError;
-use strict;
-use warnings;
+package SyntaxError;
 
 # this syntax error is intentional!
-
     {
 
-1;
-
index 160c72b..ea752fc 100644 (file)
@@ -1,9 +1,8 @@
-#!/usr/bin/env perl
-package Anti::Mouse;
+package Unsweetened;
 use strict;
 use warnings;
 
-sub antimouse { 1 }
+sub unsweetened { 1 }
 
 1;