X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconsole.pl;h=ceac24e278890d1275fa6f904761d1993355061e;hb=de6161942af879983173417d630b6327b50a423a;hp=8a1c8719f8b7f24d1423c26f328c154c242e6714;hpb=77b4df8a7ed96c2385ae2b73f273dd3baf69a1ee;p=spider.git

diff --git a/perl/console.pl b/perl/console.pl
index 8a1c8719..ceac24e2 100755
--- a/perl/console.pl
+++ b/perl/console.pl
@@ -426,7 +426,7 @@ Msg->set_event_handler(\*STDIN, "read" => \&rec_stdin);
 
 for (;;) {
 	my $t;
-	Msg->event_loop(1, 0.010);
+	Msg->event_loop(1, 1);
 	$top->refresh() if $top->is_wintouched;
 	$bot->refresh();
 	$t = time;