X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=t%2F001_mouse%2F059-weak-with-default.t;h=2710d7da78352723dbd51da4ed1641ff5b6c971b;hp=5a5a46d6f6604cb724e7d34f9c21b70dd3d51d46;hb=8aba926dbf11e9cf418c7c79b925d15e60e1e990;hpb=98e392b90e66275efbacd8e33488e0b02b4960d4

diff --git a/t/001_mouse/059-weak-with-default.t b/t/001_mouse/059-weak-with-default.t
index 5a5a46d..2710d7d 100644
--- a/t/001_mouse/059-weak-with-default.t
+++ b/t/001_mouse/059-weak-with-default.t
@@ -1,7 +1,7 @@
 #!perl
 use strict;
 use warnings;
-use Test::More tests => 4;
+use Test::More tests => 6;
 
 {
     package MyClass;
@@ -27,9 +27,11 @@ use Test::More tests => 4;
 my $o = MyClass->new();
 is($o->weak_with_default, undef);
 is($o->lazy_weak_with_default, undef);
+is($o->lazy_weak_with_default, undef);
 
 MyClass->meta->make_immutable();
 
 $o = MyClass->new();
 is($o->weak_with_default, undef);
 is($o->lazy_weak_with_default, undef);
+is($o->lazy_weak_with_default, undef);