[svn:dbi] r9290 - dbi/trunk/lib/DBI

[timbo]

Author: timbo
Date: Wed Mar 21 07:50:52 2007
New Revision: 9290

Modified:
   dbi/trunk/lib/DBI/PurePerl.pm

Log:
Fix croak call in PurePerl.


Modified: dbi/trunk/lib/DBI/PurePerl.pm
==============================================================================
--- dbi/trunk/lib/DBI/PurePerl.pm       (original)
+++ dbi/trunk/lib/DBI/PurePerl.pm       Wed Mar 21 07:50:52 2007
@@ -716,7 +716,7 @@
 sub STORE {
     my ($h,$key,$value) = @_;
     if ($key eq 'AutoCommit') {
-       croak("DBD driver has not implemented the AutoCommit attribute")
+        Carp::croak("DBD driver has not implemented the AutoCommit attribute")
            unless $value == -900 || $value == -901;
        $value = ($value == -901);
     }