[haver-commits] r927 - trunk/perl/server/lib/Haver/Server

[haver]

Author: dylan
Date: 2005-11-18 18:24:32 -0500 (Fri, 18 Nov 2005)
New Revision: 927

Modified:
   trunk/perl/server/lib/Haver/Server/Store.pm
Log:
removed locking.


Modified: trunk/perl/server/lib/Haver/Server/Store.pm
===================================================================
--- trunk/perl/server/lib/Haver/Server/Store.pm 2005-11-17 03:51:36 UTC (rev 
926)
+++ trunk/perl/server/lib/Haver/Server/Store.pm 2005-11-18 23:24:32 UTC (rev 
927)
@@ -52,7 +52,6 @@
        my $data = $entity->dump($self);
        my $file = $self->filename($entity->namespace, $entity->name);
 
-       $self->unlock($entity->namespace, $entity->name);
        $self->_save_file($file, ref($entity), $data);
 }
 
@@ -63,7 +62,6 @@
                die "can't fetch $ns/$name: locked.";
        }
        my ($class, $data)  = @{ $self->_load_file($file) };
-       $self->lock($ns, $name);
        return $class->load($data, $self);
 }