X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Singleton.git;a=blobdiff_plain;f=lib%2FMooseX%2FSingleton.pm;h=bd8b7bcfd44542646cb2e9a29c9149382037baff;hp=5b65d5dec1c53c8e66fadcc34278002078e73a1d;hb=e092ebe0b342e716490166f78037d40916edeaba;hpb=553b1b2b47f55ea6c5651d10fc79e14f9a1992a0 diff --git a/lib/MooseX/Singleton.pm b/lib/MooseX/Singleton.pm index 5b65d5d..bd8b7bc 100644 --- a/lib/MooseX/Singleton.pm +++ b/lib/MooseX/Singleton.pm @@ -1,18 +1,22 @@ package MooseX::Singleton; -use Moose; + +use Moose (); +use Moose::Exporter; use MooseX::Singleton::Object; use MooseX::Singleton::Meta::Class; -our $VERSION = 0.05; - -sub import { - my $caller = caller; +our $VERSION = '0.13'; +$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', + ); } 1; @@ -27,7 +31,7 @@ MooseX::Singleton - turn your Moose class into a singleton =head1 VERSION -Version 0.04, released 03 Feb 08 +Version 0.08, released 24 May 08 =head1 SYNOPSIS @@ -94,9 +98,11 @@ Anders Nor Berle Edebolaz@gmail.comE Ricardo SIGNES Erjbs@cpan.orgE +Dave Rolsky Eautarch@urth.orgE + =head1 COPYRIGHT AND LICENSE -Copyright 2007 Shawn M Moore. +Copyright 2007, 2008 Shawn M Moore. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.