use strict;
use warnings;
-use Test::More tests => 15;
+use Test::More tests => 16;
BEGIN {
package MooseX::Singleton::Test;
is($mst->distinct_keys, 3, "added another key");
my $mst2 = MooseX::Singleton::Test->instance;
+is($mst, $mst2, 'instances are the same object');
isa_ok($mst2, 'MooseX::Singleton::Test', 'Singleton->instance returns a real instance');
is($mst2->distinct_keys, 3, "keys from before");