From: Stevan Little <stevan.little@iinteractive.com>
Date: Sat, 15 Apr 2006 20:59:22 +0000 (+0000)
Subject: BUGS
X-Git-Tag: 0_05~30
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=648e79aebb6d044198514a10592d9866cbf46589;p=gitmo%2FMoose.git

BUGS
---

diff --git a/lib/Moose/Meta/Class.pm b/lib/Moose/Meta/Class.pm
index 3dc6611..26df000 100644
--- a/lib/Moose/Meta/Class.pm
+++ b/lib/Moose/Meta/Class.pm
@@ -4,6 +4,8 @@ package Moose::Meta::Class;
 use strict;
 use warnings;
 
+use Class::MOP;
+
 use Carp         'confess';
 use Scalar::Util 'weaken', 'blessed';
 
diff --git a/lib/Moose/Object.pm b/lib/Moose/Object.pm
index 569246b..a035523 100644
--- a/lib/Moose/Object.pm
+++ b/lib/Moose/Object.pm
@@ -3,6 +3,8 @@ package Moose::Object;
 
 use strict;
 use warnings;
+
+use Moose::Meta::Class;
 use metaclass 'Moose::Meta::Class' => (
 	':attribute_metaclass' => 'Moose::Meta::Attribute'
 );
diff --git a/t/102_Moose_Object_error.t b/t/102_Moose_Object_error.t
new file mode 100644
index 0000000..37e20f3
--- /dev/null
+++ b/t/102_Moose_Object_error.t
@@ -0,0 +1,10 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use lib 't/lib', 'lib';
+
+use Test::More tests => 1;
+
+use_ok('MyMooseObject');
\ No newline at end of file
diff --git a/t/lib/MyMooseObject.pm b/t/lib/MyMooseObject.pm
new file mode 100644
index 0000000..53178e4
--- /dev/null
+++ b/t/lib/MyMooseObject.pm
@@ -0,0 +1,7 @@
+package MyMooseObject;
+
+use strict;
+use warnings;
+use base 'Moose::Object';
+
+1;
\ No newline at end of file