renamed get_current_storage to get_from_storage since the first method name is very...

[dbsrgits/DBIx-Class.git] / lib / DBIx / Class / PK.pm

diff --git a/lib/DBIx/Class/PK.pm b/lib/DBIx/Class/PK.pm
index f664cc6..32efba6 100644 (file)
--- a/lib/DBIx/Class/PK.pm
+++ b/lib/DBIx/Class/PK.pm
@@ -40,7 +40,7 @@ sub discard_changes {
   delete $self->{_dirty_columns};
   return unless $self->in_storage; # Don't reload if we aren't real!
   
-  if( my $current_storage = $self->get_current_storage) {
+  if( my $current_storage = $self->get_from_storage) {
        
     # Set $self to the current.
        %$self = %$current_storage;