X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FDB.pm;h=1df8835b8d219ad17b8e2829b4f42fbd34696760;hb=c687b87e860c97257542dda2b14c0137f6fbc583;hp=0ef24b48adbe1cadcbdfbcac3a2d003d669afc42;hpb=8fe001e1f588a2a35923a74d262cd011466d31aa;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/DB.pm b/lib/DBIx/Class/DB.pm index 0ef24b4..1df8835 100644 --- a/lib/DBIx/Class/DB.pm +++ b/lib/DBIx/Class/DB.pm @@ -1,6 +1,7 @@ package DBIx::Class::DB; use base qw/Class::Data::Inheritable/; +use DBI; __PACKAGE__->mk_classdata('_dbi_connect_info'); __PACKAGE__->mk_classdata('_dbi_connect_package'); @@ -24,7 +25,7 @@ sub _populate_dbh { sub _dbi_connect { my ($class, @info) = @_; - return DBI->connect(@info); + return DBI->connect_cached(@info); } sub connection {