From: Mateu X Hunter <hunter@missoula.org>
Date: Thu, 15 Dec 2011 15:33:11 +0000 (-0700)
Subject: No need for ScalarRef when using Sub::Quote
X-Git-Tag: v0.009013~7
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6b3002b277063cbb60eb0f1dcc0d62f9a38a5dc0;p=gitmo%2FMoo.git

No need for ScalarRef when using Sub::Quote
---

diff --git a/lib/Sub/Quote.pm b/lib/Sub/Quote.pm
index f75f79d..b5c5cc6 100644
--- a/lib/Sub/Quote.pm
+++ b/lib/Sub/Quote.pm
@@ -154,10 +154,10 @@ Sub::Quote - efficient generation of subroutines via string eval
 
  quote_sub 'Silly::doggy', q{ print "woof" };
 
- my $sound; $$sound = 0;
+ my $sound = 0;
 
  quote_sub 'Silly::dagron',
-   q{ print ++$$sound % 2 ? 'burninate' : 'roar' },
+   q{ print ++$sound % 2 ? 'burninate' : 'roar' },
    { '$sound' => \$sound };
 
 And elsewhere: