From: stevan <stevan@3efe9002-19ed-0310-8735-a98156148065>
Date: Wed, 7 Mar 2007 05:01:08 +0000 (+0000)
Subject: Adding MooseX::Getopt first draft
X-Git-Tag: 0_03^0
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMoose-Policy.git;a=commitdiff_plain;h=95c5abfdcba0f03a80a75622b26bb7841af0cf7a

Adding MooseX::Getopt first draft
---

diff --git a/Changes b/Changes
index 6b2827c..58eeb1c 100644
--- 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
--- 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;