package MooseX::Singleton;
-use Moose;
+
+use Moose ();
+use Moose::Exporter;
use MooseX::Singleton::Object;
use MooseX::Singleton::Meta::Class;
-our $VERSION = 0.07;
-
-sub import {
- my $caller = caller;
+our $VERSION = '0.11';
+$VERSION = eval $VERSION;
- Moose::init_meta($caller, 'MooseX::Singleton::Object', 'MooseX::Singleton::Meta::Class');
+Moose::Exporter->setup_import_methods( also => 'Moose' );
- Moose->import({into => $caller});
- strict->import;
- warnings->import;
+sub init_meta {
+ shift;
+ Moose->init_meta(
+ @_,
+ base_class => 'MooseX::Singleton::Object',
+ metaclass => 'MooseX::Singleton::Meta::Class',
+ );
}
-no Moose;
-
1;
__END__
=head1 VERSION
-Version 0.07, released 07 Mar 08
+Version 0.08, released 24 May 08
=head1 SYNOPSIS