From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Thu, 14 Apr 2011 16:42:13 +0000 (+0200)
Subject: convert @row->{foo} into @{$row->{foo}}
X-Git-Url: http://git.rot13.org/?p=MojoFacets.git;a=commitdiff_plain;h=3e1ecb5815eb15e076a82ccf9e64cd7e03011162

convert @row->{foo} into @{$row->{foo}}
---

diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm
index ceb0d8e..0cdb77b 100644
--- a/lib/MojoFacets/Data.pm
+++ b/lib/MojoFacets/Data.pm
@@ -813,6 +813,9 @@ sub items {
 	$code =~ s{\r}{}gs;
 	$code =~ s{\n+$}{\n}s;
 
+	# XXX convert @row->{foo} into @{$row->{foo}}
+	$code =~ s|\@(row->{[^}]+})|\@{\$$1}|gs;
+
 	my $commit = $self->param('commit');
 	my $test = $self->param('test');