X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Foose.pm;h=cd87abccfa9b9ad8b27fc65706e17aef96d1e2b3;hb=3b1a1b223b99a1199e0ccdaff61e007961fb21d3;hp=8af0e03f2a6a9db25903183dd4e64637b9025a7b;hpb=ad46f5244f59757c45306c4a41e195b7aa4b0943;p=gitmo%2FMoose.git

diff --git a/lib/oose.pm b/lib/oose.pm
index 8af0e03..cd87abc 100644
--- a/lib/oose.pm
+++ b/lib/oose.pm
@@ -3,9 +3,7 @@ package oose;
 use strict;
 use warnings;
 
-use Class::MOP;
-
-our $AUTHORITY = 'cpan:STEVAN';
+use Class::Load qw(load_class);
 
 BEGIN {
     my $package;
@@ -13,7 +11,7 @@ BEGIN {
         $package = $_[1] || 'Class';
         if ($package =~ /^\+/) {
             $package =~ s/^\+//;
-            Class::MOP::load_class($package);
+            load_class($package);
         }
     }
     use Filter::Simple sub { s/^/package $package;\nuse Moose;use Moose::Util::TypeConstraints;\n/; }
@@ -42,7 +40,8 @@ __END__
 
 =head1 DESCRIPTION
 
-oose.pm is a simple source filter that adds C<package $name; use Moose;>
+oose.pm is a simple source filter that adds
+C<package $name; use Moose; use Moose::Util::TypeConstraints;>
 to the beginning of your script and was entirely created because typing
 C<perl -e'package Foo; use Moose; ...'> was annoying me.
 
@@ -54,7 +53,8 @@ oose provides exactly one method and it's automatically called by perl:
 
 =item B<import($package)>
 
-Pass a package name to import to be used by the source filter.
+Pass a package name to import to be used by the source filter. The
+package defaults to C<Class> if none is given.
 
 =back