X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FAutoUpdate.pm;h=c32c12520529909ec3de7aff4552031a185859c0;hb=f1952f5c69e092d9ce416586f29942f8c2f66bce;hp=fb33a0ab23af284956019aed9c160476fd32e348;hpb=8d5134b09734852f9c11a3fd6b1c8f6551637b53;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/CDBICompat/AutoUpdate.pm b/lib/DBIx/Class/CDBICompat/AutoUpdate.pm index fb33a0a..c32c125 100644 --- a/lib/DBIx/Class/CDBICompat/AutoUpdate.pm +++ b/lib/DBIx/Class/CDBICompat/AutoUpdate.pm @@ -1,4 +1,5 @@ -package DBIx::Class::CDBICompat::AutoUpdate; +package # hide from PAUSE + DBIx::Class::CDBICompat::AutoUpdate; use strict; use warnings; @@ -9,7 +10,7 @@ __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; }