X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Fmoose-lazy.t;h=8e8475bd270b739984821524a8f1490bb29ef969;hb=master;hp=9e1758398373067b290ecc7708a4f9857f0b27e9;hpb=879ef22da0750dd81b546cf11a12ccf7fea62ff6;p=gitmo%2FMoo.git diff --git a/xt/moose-lazy.t b/xt/moose-lazy.t index 9e17583..8e8475b 100644 --- a/xt/moose-lazy.t +++ b/xt/moose-lazy.t @@ -1,8 +1,5 @@ use strictures 1; use Test::More; -use Test::Exception; - -use Moo::HandleMoose; { package LazyFrew; @@ -26,9 +23,9 @@ use Moo::HandleMoose; has frew => ( is => 'rw', default => quote_sub(q{ - $quoted_default_ran = 1; + $$quoted_default_ran = 1; 'test frew' - }, { '$quoted_default_ran' => \$quoted_default_ran }), + }, { '$quoted_default_ran' => \\$quoted_default_ran }), lazy => 1, );