X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUser.pm;h=bfc861de27271aaf7ee0c9cac912d3f41d11f24e;hb=64d857b27904d74ad83c36c41fae1f18c43f4c54;hp=b996e5c536bc6d377265cadbde0d8375a8f0bbea;hpb=f0323dc530e2aa3fe5b8cd50b1c8c35aac67c52e;p=spider.git

diff --git a/perl/DXUser.pm b/perl/DXUser.pm
index b996e5c5..bfc861de 100644
--- a/perl/DXUser.pm
+++ b/perl/DXUser.pm
@@ -28,7 +28,7 @@ use vars qw(%u $dbm $filename %valid $lastoperinterval $lasttime);
 %u = ();
 $dbm = undef;
 $filename = undef;
-$lastoperinterval = 30*24*60*60;
+$lastoperinterval = 60*24*60*60;
 $lasttime = 0;
 
 # hash of valid elements and a simple prompt