X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FAutoUpdate.pm;h=16f2164ebd52d3a3a2e049979447514fbf22d394;hb=5e0eea3522876a30453af24097507198bbbc9409;hp=fb33a0ab23af284956019aed9c160476fd32e348;hpb=8d5134b09734852f9c11a3fd6b1c8f6551637b53;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/CDBICompat/AutoUpdate.pm b/lib/DBIx/Class/CDBICompat/AutoUpdate.pm index fb33a0a..16f2164 100644 --- a/lib/DBIx/Class/CDBICompat/AutoUpdate.pm +++ b/lib/DBIx/Class/CDBICompat/AutoUpdate.pm @@ -1,15 +1,16 @@ -package DBIx::Class::CDBICompat::AutoUpdate; +package # hide from PAUSE + DBIx::Class::CDBICompat::AutoUpdate; use strict; use warnings; -use base qw/Class::Data::Inheritable/; +use base 'DBIx::Class'; __PACKAGE__->mk_classdata('__AutoCommit'); sub set_column { my $self = shift; - my $ret = $self->NEXT::set_column(@_); + my $ret = $self->next::method(@_); $self->update if ($self->autoupdate && $self->{_in_storage}); return $ret; }