From: Shawn M Moore <sartak@gmail.com>
Date: Sun, 21 Dec 2008 22:48:42 +0000 (+0000)
Subject: Finish renaming these test modules
X-Git-Tag: 0.19~103
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=abe28e1147e1faaf03a195a7a5a8ba023e421b0f;p=gitmo%2FMouse.git

Finish renaming these test modules
---

diff --git a/t/005-extends.t b/t/005-extends.t
index d3d6af1..31d7d24 100644
--- a/t/005-extends.t
+++ b/t/005-extends.t
@@ -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;
diff --git a/t/020-load-class.t b/t/020-load-class.t
index d115db7..705c0db 100644
--- a/t/020-load-class.t
+++ b/t/020-load-class.t
@@ -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/;
 
diff --git a/t/lib/SyntaxError.pm b/t/lib/SyntaxError.pm
index 6832406..91d6768 100644
--- a/t/lib/SyntaxError.pm
+++ b/t/lib/SyntaxError.pm
@@ -1,11 +1,5 @@
-#!/usr/bin/env perl
-package Anti::MouseError;
-use strict;
-use warnings;
+package SyntaxError;
 
 # this syntax error is intentional!
-
     {
 
-1;
-
diff --git a/t/lib/Unsweetened.pm b/t/lib/Unsweetened.pm
index 160c72b..ea752fc 100644
--- a/t/lib/Unsweetened.pm
+++ b/t/lib/Unsweetened.pm
@@ -1,9 +1,8 @@
-#!/usr/bin/env perl
-package Anti::Mouse;
+package Unsweetened;
 use strict;
 use warnings;
 
-sub antimouse { 1 }
+sub unsweetened { 1 }
 
 1;