2nd Pass

[dbsrgits/DBIx-Class.git] / lib / DBIx / Class / Storage / DBI / DBM.pm

diff --git a/lib/DBIx/Class/Storage/DBI/DBM.pm b/lib/DBIx/Class/Storage/DBI/DBM.pm
index 26eb290..ea26181 100644 (file)
--- a/lib/DBIx/Class/Storage/DBI/DBM.pm
+++ b/lib/DBIx/Class/Storage/DBI/DBM.pm
@@ -1,6 +1,6 @@
 package DBIx::Class::Storage::DBI::DBM;
 
-use base 'DBIx::Class::Storage::DBI::SQL::Statement';
+use base 'DBIx::Class::Storage::DBI::DBDFile';
 use mro 'c3';
 use namespace::clean;
 
@@ -8,19 +8,19 @@ sub insert {
    my ($self, $source, $to_insert) = @_;
 
    my $col_infos = $source->columns_info;
-   
+
    foreach my $col (keys %$col_infos) {
       # this will naturally fall into undef/NULL if default_value doesn't exist
       $to_insert->{$col} = $col_infos->{$col}{default_value}
          unless (exists $to_insert->{$col});
    }
-   
+
    $self->next::method($source, $to_insert);
 }
 
 sub insert_bulk {
    my ($self, $source, $cols, $data) = @_;
-   
+
    my $col_infos = $source->columns_info;
 
    foreach my $col (keys %$col_infos) {
@@ -32,15 +32,15 @@ sub insert_bulk {
          }
       }
    }
-   
+
    $self->next::method($source, $cols, $data);
 }
-   
+
 1;
 
 =head1 NAME
 
-DBIx::Class::Storage::DBI::SNMP - Support for DBM & MLDBM files via DBD::DBM
+DBIx::Class::Storage::DBI::DBM - Support for DBM & MLDBM files via DBD::DBM
 
 =head1 SYNOPSIS
 
@@ -49,7 +49,7 @@ This subclass supports DBM & MLDBM files via L<DBD::DBM>.
 =head1 DESCRIPTION
 
 This subclass is essentially just a stub that uses the super class
-L<DBIx::Class::Storage::DBI::SQL::Statement>.
+L<DBIx::Class::Storage::DBI::DBDFile>.
 
 =head1 IMPLEMENTATION NOTES