[Dbix-class] Overriding all()

[Paul Makepeace]

This used to work, perhaps by accident of usage,

package IDL::ResultSet::SiteTestimonial;
use base 'DBIx::Class::ResultSet';

sub all {
	my $self = shift;
	return $self->search(
		{ visible => 'Y' }, { order_by => 'sort desc' });
}

but now seeing a q[Deep recursion on subroutine
"DBIx::Class::ResultSet::search"] error. What's the BP way of doing
this?

Thanks,
Paul