From: Matt S Trout <mst@shadowcat.co.uk>
Date: Wed, 17 Apr 2019 02:13:45 +0000 (+0000)
Subject: fixup sigil usage
X-Git-Tag: v2.000000~3^2~214
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=78bbc7c863535a185d9c4983a0dac01e8df18948;p=dbsrgits%2FSQL-Abstract.git

fixup sigil usage
---

diff --git a/lib/SQL/Abstract/Clauses.pm b/lib/SQL/Abstract/Clauses.pm
index cb9d07b..2dd9c4e 100644
--- a/lib/SQL/Abstract/Clauses.pm
+++ b/lib/SQL/Abstract/Clauses.pm
@@ -311,7 +311,7 @@ BEGIN {
   }
 }
 
-sub statement_list { sort keys ${$_[0]}{clauses_of} }
+sub statement_list { sort keys %{$_[0]->{clauses_of}} }
 
 sub clauses_of {
   my ($self, $of, @clauses) = @_;