summaryrefslogtreecommitdiffstats
path: root/lib/MooseX/NonMoose
diff options
context:
space:
mode:
authordoy <doy@tozt.net>2009-04-20 22:34:26 -0500
committerdoy <doy@tozt.net>2009-04-20 22:34:26 -0500
commitef80a79adc2f43a8b2bbffa60dcde35d4510ad1b (patch)
tree302ea3de723a278f90ef4a7db9eb0fe0882aadde /lib/MooseX/NonMoose
parent59e10e3d446a9efc0ce06afe812e3f1f14e5c174 (diff)
downloadmoosex-nonmoose-ef80a79adc2f43a8b2bbffa60dcde35d4510ad1b.tar.gz
moosex-nonmoose-ef80a79adc2f43a8b2bbffa60dcde35d4510ad1b.zip
docs for MooseX::NonMoose::Meta::Role::Class
Diffstat (limited to 'lib/MooseX/NonMoose')
-rw-r--r--lib/MooseX/NonMoose/Meta/Role/Class.pm48
1 files changed, 48 insertions, 0 deletions
diff --git a/lib/MooseX/NonMoose/Meta/Role/Class.pm b/lib/MooseX/NonMoose/Meta/Role/Class.pm
index 2bffa30..0ac46a0 100644
--- a/lib/MooseX/NonMoose/Meta/Role/Class.pm
+++ b/lib/MooseX/NonMoose/Meta/Role/Class.pm
@@ -1,6 +1,41 @@
package MooseX::NonMoose::Meta::Role::Class;
use Moose::Role;
+=head1 NAME
+
+MooseX::NonMoose::Meta::Role::Class - metaclass trait for L<MooseX::NonMoose>
+
+=head1 SYNOPSIS
+
+ package Foo;
+ use Moose -traits => 'MooseX::NonMoose::Meta::Role::Class';
+
+ # or
+
+ package My::Moose;
+ use Moose ();
+ use Moose::Exporter;
+
+ Moose::Exporter->setup_import_methods;
+ sub init_meta {
+ shift;
+ my %options = @_;
+ Moose->init_meta(%options);
+ Moose::Util::MetaRole::apply_metaclass_roles(
+ for_class => $options{for_class},
+ metaclass_roles => ['MooseX::NonMoose::Meta::Role::Class'],
+ );
+ return Class::MOP::class_of($options{for_class});
+ }
+
+=head1 DESCRIPTION
+
+This trait implements everything involved with extending non-Moose classes,
+other than doing the actual inlining at C<make_immutable> time. See
+L<MooseX::NonMoose> for more details.
+
+=cut
+
has has_nonmoose_constructor => (
is => 'rw',
isa => 'Bool',
@@ -94,4 +129,17 @@ around superclasses => sub {
no Moose::Role;
+=head1 AUTHOR
+
+ Jesse Luehrs <doy at tozt dot net>
+
+=head1 COPYRIGHT AND LICENSE
+
+This software is copyright (c) 2009 by Jesse Luehrs.
+
+This is free software; you can redistribute it and/or modify it under
+the same terms as perl itself.
+
+=cut
+
1;