stop variable getting detached in lazy test

diff --git a/xt/moose-lazy.t b/xt/moose-lazy.t
index 9e17583..20a2fa2 100644 (file)
--- a/xt/moose-lazy.t
+++ b/xt/moose-lazy.t
@@ -26,9 +26,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,
    );