X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FSingleton.pm;h=2a664ff913ffe8137af959c73dbc3d44fa299140;hb=ede8dce0a097ce38426064a0eae5aa1ad14a54e6;hp=5d16bdd821b7c21c0c46b6622450da7db93068d3;hpb=b375b147ae0615bfe819dad1b2233ebf3fd90fc3;p=gitmo%2FMooseX-Singleton.git diff --git a/lib/MooseX/Singleton.pm b/lib/MooseX/Singleton.pm index 5d16bdd..2a664ff 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.03; - -sub import { - my $caller = caller; +our $VERSION = '0.09_01'; +$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.03, released 16 Dec 07 +Version 0.08, released 24 May 08 =head1 SYNOPSIS @@ -90,9 +94,15 @@ Shawn M Moore Esartak@gmail.comE Anders Nor Berle Edebolaz@gmail.comE +=head1 AND PATCHES FROM + +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.