search() should not modified its arguments

[petdance]

search() modifies the $params sent to it. It should not do this.

sub search {
    my ( $self, $query, $params ) = @_;
    $params ||= {};
    $params->{ 'q' } = $query;
    return $self->generic_solr_request( 'select', $params );
}