--- trunk/lib/Frey/DBI.pm	2008/11/19 14:39:10	454
+++ trunk/lib/Frey/DBI.pm	2008/11/19 15:28:23	455
@@ -26,7 +26,7 @@
 	default => 'select 42 as meaning_of_life',
 );
 
-sub sponge {
+sub as_sponge {
 	my ( $self ) = @_;
 
 	my $dbh = DBI->connect( $self->dsn, '', '', { RaiseError => 1 } ) || die $DBI::errstr;