*** empty log message ***

[spider.git] / perl / DXUser.pm

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index 97aca375c325bccac68ac9fb609c46a4fc86ca19..a9c7ea030177eb75948a2c5954e9242ab121487e 100644 (file)
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -94,6 +94,7 @@ use strict;
 
 sub finish
 {
+       undef $dbm;
        untie %u;
 }