--- lib/A3C/SQL.pm	2008/04/12 10:28:38	82
+++ lib/A3C/SQL.pm	2008/05/31 16:30:09	145
@@ -3,6 +3,11 @@
 use strict;
 use warnings;
 
+use base qw(Jifty::Object Class::Accessor::Fast);
+__PACKAGE__->mk_accessors( qw(query arguments dbh) );
+
+use Data::Dump qw/dump/;
+
 =head1 NAME
 
 A3C::SQL
@@ -17,12 +22,13 @@
 
   my $sql = A3C::SQL->new({ query => 'select now()' });
 
-=cut
-
-use base qw(Jifty::Object Class::Accessor::Fast);
-__PACKAGE__->mk_accessors( qw(query arguments) );
+As a alternative, if you don't want to use Jifty's database handle,
+specify it like this:
 
-use Data::Dump qw/dump/;
+  my $sql = A3C::SQL->new({
+  	query => 'select now()',
+	dbh => $my_dbh,
+  });
 
 =head2 sth
 
@@ -33,7 +39,7 @@
 sub sth {
 	my $self = shift;
 	if ( ! $self->{_sth} ) {
-		my $dbh = Jifty->handle->dbh;
+		my $dbh = $self->dbh || Jifty->handle->dbh;
 		my $sth = $dbh->prepare( $self->query ) or $dbh->errstr;
 		if ( $self->arguments ) {
 			Jifty->log->debug( $self->sql . ' arguments: ' . dump( $self->arguments ) );