Make initialize work
Dave Rolsky [Fri, 25 Dec 2009 15:35:27 +0000 (09:35 -0600)]
lib/MooseX/Singleton/Role/Object.pm

index b09613f..105ec7e 100644 (file)
@@ -10,7 +10,7 @@ sub initialize {
   my $existing = $class->meta->existing_singleton;
   confess "Singleton is already initialized" if $existing;
 
-  return $class->SUPER::new(@args);
+  return $class->new(@args);
 }
 
 override new => sub {