All tests pass except for the transaction tests under MySQL. InnoDB sucks

[dbsrgits/DBM-Deep.git] / lib / DBM / Deep / Sector / File / Reference.pm

diff --git a/lib/DBM/Deep/Sector/File/Reference.pm b/lib/DBM/Deep/Sector/File/Reference.pm
index c2e2271..5b4ee12 100644 (file)
--- a/lib/DBM/Deep/Sector/File/Reference.pm
+++ b/lib/DBM/Deep/Sector/File/Reference.pm
@@ -408,6 +408,7 @@ sub get_classname {
     return $self->engine->load_sector( $class_offset )->data;
 }
 
+# Look to hoist this method into a ::Reference trait
 sub data {
     my $self = shift;
     my ($args) = @_;
@@ -450,9 +451,7 @@ sub free {
     my $self = shift;
 
     # We're not ready to be removed yet.
-    if ( $self->decrement_refcount > 0 ) {
-        return;
-    }
+    return if $self->decrement_refcount > 0;
 
     # Rebless the object into DBM::Deep::Null.
     eval { %{ $self->engine->cache->{ $self->offset } } = (); };