X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2FDXCluster.pm;h=51c63f8239ed7af492148b68cf5f67007a5254af;hp=6daf65a3874a5ebfd29ba8326e45b13b733854d0;hb=099c6b4a10d9f1e7471b0c94273cd992b5814cdc;hpb=cce345b95c555a0b45218c5b452bc0f5f4f13bab diff --git a/perl/DXCluster.pm b/perl/DXCluster.pm index 6daf65a3..51c63f82 100644 --- a/perl/DXCluster.pm +++ b/perl/DXCluster.pm @@ -97,8 +97,9 @@ sub cluster { my $users = DXCommandmode::get_all(); my $uptime = main::uptime(); - - return " $DXNode::nodes nodes, $users local / $DXNode::users total users Max users $DXNode::maxusers Uptime $uptime"; + my $tot = $DXNode::users + 1; + + return " $DXNode::nodes nodes, $users local / $tot total users Max users $DXNode::maxusers Uptime $uptime"; } sub DESTROY