Remove the types stuff
t0m [Sun, 7 Jun 2009 01:21:52 +0000 (02:21 +0100)]
t/lib/DemoTypeLibrary.pm [deleted file]
t/lib/SomeModelClass.pm

diff --git a/t/lib/DemoTypeLibrary.pm b/t/lib/DemoTypeLibrary.pm
deleted file mode 100644 (file)
index 3019fc5..0000000
+++ /dev/null
@@ -1,19 +0,0 @@
-package DemoTypeLibrary;
-
-use MooseX::Types 
-    -declare => [qw(
-        MessageDocument
-    )];
-
-use MooseX::Types::Moose qw/Str/;
-use MooseX::Types::Structured qw/Dict/;
-
-subtype MessageDocument,
-    as Dict[
-        name => Str,
-        type => Str,
-    ];
-
-
-1;
-
index f3184f8..83f7271 100644 (file)
@@ -7,8 +7,6 @@ requires 'say_hello';
 package SomeModelClass;
 use Moose;
 use CatalystX::ControllerGeneratingModel;
-use DemoTypeLibrary qw/MessageDocument/;
-use MooseX::Lexical::Types qw/MessageDocument/;
 use namespace::autoclean;
 
 # Note trivial calling convention.
@@ -31,10 +29,5 @@ command say_hello => sub {
 
 with 'SomeModelClassInterface';
 
-before 'say_hello' => sub {
-    my $self = shift;
-    my MessageDocument $message = shift;
-};
-
 __PACKAGE__->meta->make_immutable;