X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FAutoUpdate.pm;h=c32c12520529909ec3de7aff4552031a185859c0;hb=aefa6508d3b034fb36d1a919c5be0aa363c52328;hp=f576276f9dca70b3b827282cc104ecb2cf41756b;hpb=510ca9120ab2fea50a0852ee4ed6a13735ed7ebc;p=dbsrgits%2FDBIx-Class-Historic.git

diff --git a/lib/DBIx/Class/CDBICompat/AutoUpdate.pm b/lib/DBIx/Class/CDBICompat/AutoUpdate.pm
index f576276..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,8 +10,8 @@ __PACKAGE__->mk_classdata('__AutoCommit');
 
 sub set_column {
   my $self = shift;
-  my $ret = $self->NEXT::set_column(@_);
-  $self->update if ($self->autoupdate && $self->{_in_database});
+  my $ret = $self->next::method(@_);
+  $self->update if ($self->autoupdate && $self->{_in_storage});
   return $ret;
 }