From: Marius Gavrilescu <marius@ieval.ro>
Date: Sun, 25 Jan 2015 21:21:12 +0000 (+0200)
Subject: Fix keys on reference is experimental warning
X-Git-Url: http://git.ieval.ro/?a=commitdiff_plain;h=418101af1d14d3dfe15748186b18072308bd1a5b;p=gruntmaster-page.git

Fix keys on reference is experimental warning
---

diff --git a/lib/Plack/App/Gruntmaster/HTML.pm b/lib/Plack/App/Gruntmaster/HTML.pm
index 3306be2..dc74d87 100644
--- a/lib/Plack/App/Gruntmaster/HTML.pm
+++ b/lib/Plack/App/Gruntmaster/HTML.pm
@@ -238,7 +238,7 @@ sub process_log {
 		my $elem = $tree->fclass($cls);
 		next unless $elem;
 		delete $args{args}{page};
-		my $str = join '&', map { $_ . '=' . $args{args}{$_} } keys $args{args};
+		my $str = join '&', map { $_ . '=' . $args{args}{$_} } keys %{$args{args}};
 		$elem->find('a')->edit_href(sub{s/$/&$str/});
 	}
 	$tree->fclass('current')->replace_content("Page $args{current_page} of $args{last_page}");