Renamed DBIx::Class::Table::in_database to DBIx::Class::Table::in_storage
[dbsrgits/DBIx-Class.git] / lib / DBIx / Class / CDBICompat / LiveObjectIndex.pm
index 29a995e..4c52191 100644 (file)
@@ -85,7 +85,7 @@ sub discard_changes {
   if (my $key = $self->_live_object_key) {
     $self->remove_from_object_index;
     my $ret = $self->NEXT::ACTUAL::discard_changes;
-    $self->live_object_index->{$key} = $self if $self->in_database;
+    $self->live_object_index->{$key} = $self if $self->in_storage;
     return $ret;
   } else {
     return $self->NEXT::ACTUAL::discard_changes;