X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FQSL.pm;h=1fd7130bf049b92b94121de721cc7e85cdc1f2df;hb=7e3729a9039462c460dae4804f40c0bd506f3423;hp=f62897bff61667086d98480f1aded750ce61a0ca;hpb=057580c6b9b77fece532a02d3df7b5a5b1af1054;p=spider.git diff --git a/perl/QSL.pm b/perl/QSL.pm index f62897bf..1fd7130b 100644 --- a/perl/QSL.pm +++ b/perl/QSL.pm @@ -120,6 +120,7 @@ sub get return decode($value); } + sub put { return unless $dbm;