X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUser.pm;h=432507462e5048b51620d271e45307e19300f40c;hb=4b94818ce60ca5727ceb77b0b5d752d5f5324680;hp=25672f969d7f8502160b1c941f9490c3f0eb4cf5;hpb=a50f4484d80f17f29aed57f2d5bae02662cd15a2;p=spider.git

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index 25672f96..43250746 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -191,7 +191,7 @@ sub del_file
 sub process
 {
 	if ($main::systime > $lasttime + 15) {
-		$dbm->sync;
+		$dbm->sync if $dbm;
 		$lasttime = $main::systime;
 	}
 }