projects
/
MojoFacets.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
4f1b2fd
)
show only columns which exist in dataset
author
Dobrica Pavlinusic
<dpavlin@rot13.org>
Wed, 12 May 2010 18:06:38 +0000
(20:06 +0200)
committer
Dobrica Pavlinusic
<dpavlin@rot13.org>
Wed, 12 May 2010 18:06:38 +0000
(20:06 +0200)
lib/MojoFacets/Data.pm
patch
|
blob
|
history
diff --git
a/lib/MojoFacets/Data.pm
b/lib/MojoFacets/Data.pm
index
3a4df8e
..
81e434b
100644
(file)
--- a/
lib/MojoFacets/Data.pm
+++ b/
lib/MojoFacets/Data.pm
@@
-82,9
+82,9
@@
sub columns {
my @columns;
my @columns;
- @columns = @{ $self->session('columns') } if $self->session('columns');
+ @columns =
grep { defined $stats->{$_}->{count} }
@{ $self->session('columns') } if $self->session('columns');
- foreach my $c ( sort { $stats->{$b}->{count} <=> $stats->{$a}->{count} } keys %$stats ) {
+ foreach my $c ( sort { $stats->{$b}->{count} <=> $stats->{$a}->{count} }
grep { defined $stats->{$_}->{count} }
keys %$stats ) {
push @columns, $c unless grep { /^\Q$c\E$/ } @columns;
}
push @columns, $c unless grep { /^\Q$c\E$/ } @columns;
}