Adding MooseX::Getopt first draft

diff --git a/Changes b/Changes
index 6b2827c..58eeb1c 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,9 @@
 Revision history for Perl extension Moose-Policy
 
+0.03 
+    - changing it to use the Class::MOP::is_class_loaded
+      instead.
+
 0.02 Sun. Nov. 5, 2006
     - We removed UNIVERSAL::require in Moose recently, and 
       this module was breaking beacuse of that. It is now 

diff --git a/lib/Moose/Policy.pm b/lib/Moose/Policy.pm
index 8225c76..d462f8b 100644 (file)
--- a/lib/Moose/Policy.pm
+++ b/lib/Moose/Policy.pm
@@ -3,7 +3,7 @@ package Moose::Policy;
 use strict;
 use warnings;
 
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 
 use Moose        ();
 use Carp         'confess';
@@ -14,7 +14,7 @@ sub import {
 
     my $policy = shift || return;
 
-    unless (Moose::_is_class_already_loaded($policy)) {
+    unless (Class::MOP::is_class_loaded($policy)) {
         # otherwise require it ...
         my $file = $policy . '.pm';
         $file =~ s{::}{/}g;