--- index.cgi 2009/04/13 20:23:55 3
+++ index.cgi 2009/04/14 12:43:07 6
@@ -90,7 +90,7 @@
if ( $group_by ) {
@columns = ( "count($group_by)", $group_by );
my $g;
- foreach my $c ( @where_parts, param('order_by'), $group_by ) {
+ foreach my $c ( @where_parts, $group_by ) {
$c =~ s/\s.+$//;
$g->{$c}++ if length($c) > 0;
}
@@ -99,6 +99,7 @@
param('where_value','');
param('group_by', $group_by);
param('columns', [ @columns ], [ @columns ]);
+ param('order_by', $columns[0] . ' desc');
} else {
$group_by = param('group_by');
}
@@ -177,6 +178,8 @@
qq||
, start_form( -id => 'sql' )
+ , qq|close|
+
, qq||
, checkbox_group( -name => 'columns', -values => [ @columns ], -defaults => [ @columns ] )