X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FSingleton%2FRole%2FMeta%2FClass.pm;h=c8d4162e40dbddf23969aae12a8d385007e28e3d;hb=724efd938648e6d6e20b38b0d641fee29977e3ad;hp=daaa5ba0b3d6e6eaceb238f08b47f994947184ab;hpb=a4e5ec1e7c78b062e12aa4d240d44ce7cf83eb14;p=gitmo%2FMooseX-Singleton.git

diff --git a/lib/MooseX/Singleton/Role/Meta/Class.pm b/lib/MooseX/Singleton/Role/Meta/Class.pm
index daaa5ba..c8d4162 100644
--- a/lib/MooseX/Singleton/Role/Meta/Class.pm
+++ b/lib/MooseX/Singleton/Role/Meta/Class.pm
@@ -1,9 +1,11 @@
-#!/usr/bin/env perl
 package MooseX::Singleton::Role::Meta::Class;
 use Moose::Role;
 use MooseX::Singleton::Role::Meta::Instance;
 use MooseX::Singleton::Role::Meta::Method::Constructor;
 
+our $VERSION = '0.22';
+$VERSION = eval $VERSION;
+
 sub existing_singleton {
     my ($class) = @_;
     my $pkg = $class->name;
@@ -11,7 +13,7 @@ sub existing_singleton {
     no strict 'refs';
 
     # create exactly one instance
-    if (defined ${"$pkg\::singleton"}) {
+    if ( defined ${"$pkg\::singleton"} ) {
         return ${"$pkg\::singleton"};
     }
 
@@ -37,7 +39,7 @@ override _construct_instance => sub {
     return ${"$pkg\::singleton"} = super;
 };
 
-no Moose;
+no Moose::Role;
 
 1;