--- trunk/vhost/webpac2.cgi 2010/03/08 17:28:02 1329 +++ trunk/vhost/webpac2.cgi 2010/03/21 20:58:57 1330 @@ -262,7 +262,11 @@ $q .= ' AND ((' . join(') OR (', map { "input=\"$_\"" } @only_input) . '))' if @only_input; warn "# query: $q\n"; - my $swish_results = $swish->query( $q ); + my $search_obj = $swish->new_search_object; + if ( my $sort = param('sort') ) { + $search_obj->set_sort( $sort ); + } + my $swish_results = $search_obj->execute( $q ); dump_yaml( 'swish_results', $swish_results );