From 3320c03f140329e34fed84797b461f35ba6bf800 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Sun, 26 Jul 2009 04:12:20 -0500
Subject: don't need to call init_meta

---
 lib/MooseX/ABC.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/MooseX/ABC.pm b/lib/MooseX/ABC.pm
index 2ba828e..ef6cb15 100644
--- a/lib/MooseX/ABC.pm
+++ b/lib/MooseX/ABC.pm
@@ -65,7 +65,8 @@ Moose::Exporter->setup_import_methods(
 sub init_meta {
     shift;
     my %options = @_;
-    Moose->init_meta(%options);
+    Carp::confess("Can't make a role into an abstract base class")
+        if Class::MOP::class_of($options{for_class})->isa('Moose::Meta::Role');
     Moose::Util::MetaRole::apply_base_class_roles(
         for_class       => $options{for_class},
         roles           => ['MooseX::ABC::Role::Object'],
-- 
cgit v1.2.3