From 7c8f7162169d2c7fb2b3462a6a799a19809f8c63 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Fri, 2 Apr 2010 13:35:37 +0200
Subject: [PATCH] columns selection fixes

---
 lib/MojoFacets/Data.pm         | 2 +-
 templates/data/columns.html.ep | 3 ++-
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm
index 0beab02..71a0a04 100644
--- a/lib/MojoFacets/Data.pm
+++ b/lib/MojoFacets/Data.pm
@@ -75,7 +75,7 @@ sub _perm_array {
 	if ( @array ) {
 		$self->session($name => [ @array ]);
 	} else {
-		@array = $self->session($name);
+		@array = @{ $self->session($name) };
 	}
 	warn "# $name ",dump @array;
 	return @array;
diff --git a/templates/data/columns.html.ep b/templates/data/columns.html.ep
index 4832d01..a4b08ad 100644
--- a/templates/data/columns.html.ep
+++ b/templates/data/columns.html.ep
@@ -16,10 +16,11 @@
 <form method=post action=/data/table >
 
 <ul>
+% my $checked; $checked->{$_}++ foreach @{ session('columns') };
 % foreach my $n ( sort { $stats->{$b}->{count} <=> $stats->{$a}->{count} } keys %$stats ) {
 <li>
 <label>
-<input type=checkbox name=columns value="<%= $n %>" <%= param($n) ? 'checked' : '' %>>
+<input type=checkbox name=columns value="<%= $n %>" <%= $checked->{$n} ? 'checked' : '' %>>
 <%= $n %>
 <span class="count"><%= $stats->{$n}->{count} %></span>
 </label>
-- 
2.20.1