Dumbass typo, ta castaway

diff --git a/lib/DBIx/Class/Storage/DBI.pm b/lib/DBIx/Class/Storage/DBI.pm
index 93e8fd2..ff89c4b 100644 (file)
--- a/lib/DBIx/Class/Storage/DBI.pm
+++ b/lib/DBIx/Class/Storage/DBI.pm
@@ -225,7 +225,7 @@ sub new {
 
 sub throw_exception {
   my ($self, $msg) = @_;
-  croask($msg);
+  croak($msg);
 }
 
 =head1 NAME