From 723ac502bbfaa09a3917deb46fe134594b5ec21f Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sun, 4 Apr 2010 21:27:39 +0200 Subject: [PATCH] move columns generation to MojoFacet::Data --- lib/MojoFacets/Data.pm | 11 +++++++++++ templates/data/columns.html.ep | 27 +++++++++++++++++++++++---- 2 files changed, 34 insertions(+), 4 deletions(-) diff --git a/lib/MojoFacets/Data.pm b/lib/MojoFacets/Data.pm index 251cd64..61fb385 100644 --- a/lib/MojoFacets/Data.pm +++ b/lib/MojoFacets/Data.pm @@ -79,9 +79,20 @@ sub load { sub columns { my $self = shift; + + my @columns; + @columns = @{ $self->session('columns') } if $self->session('columns'); + + foreach my $c ( sort { $stats->{$b}->{count} <=> $stats->{$a}->{count} } keys %$stats ) { + push @columns, $c unless grep { /^\Q$c\E$/ } @columns; + } + + $self->redirect_to( '/data/index' ) unless @columns; + $self->render( message => 'Select columns to display', stats => $stats, + columns => \@columns, checked => $self->_checked( $self->_perm_array('columns') ), ); } diff --git a/templates/data/columns.html.ep b/templates/data/columns.html.ep index 64a1e36..13548eb 100644 --- a/templates/data/columns.html.ep +++ b/templates/data/columns.html.ep @@ -1,10 +1,28 @@ -% layout 'default'; -

<%= $message %>

+% layout 'ui'; + + + + + + + +

Select and reorder columns

-