X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FQSL.pm;h=3fab28627d66efa4014adc628332dfd7496dbf0f;hb=73edaec40b921e6e932b2fb873f2d6ce381d1d92;hp=35117b1ba9bc5a1f7da9b06efca87121de2f0612;hpb=25270ac4d9d486c2749515c8b8f32e223d4f38b7;p=spider.git

diff --git a/perl/QSL.pm b/perl/QSL.pm
index 35117b1b..3fab2862 100644
--- a/perl/QSL.pm
+++ b/perl/QSL.pm
@@ -91,7 +91,6 @@ sub put
 	my $self = shift;
 	my $key = $self->[0];
 	my $value = nfreeze($self);
-	$dbm->del($key);
 	$dbm->put($key, $value);
 }