[Bast-commits] r3646 - DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2007-08-05 15:41:51 +0100 (Sun, 05 Aug 2007)
New Revision: 3646

Modified:
   DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI.pm
Log:
add cursor_class to storage opt list

Modified: DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI.pm
===================================================================
--- DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI.pm	2007-08-04 17:30:14 UTC (rev 3645)
+++ DBIx-Class/0.08/trunk/lib/DBIx/Class/Storage/DBI.pm	2007-08-05 14:41:51 UTC (rev 3646)
@@ -481,7 +481,9 @@
   my $last_info = $dbi_info->[-1];
   if(ref $last_info eq 'HASH') {
     $last_info = { %$last_info }; # so delete is non-destructive
-    for my $storage_opt (qw/on_connect_do disable_sth_caching unsafe/) {
+    for my $storage_opt (
+        qw/on_connect_do disable_sth_caching unsafe cursor_class/
+      ) {
       if(my $value = delete $last_info->{$storage_opt}) {
         $self->$storage_opt($value);
       }