From: dms Date: Sat, 17 Feb 2001 13:41:35 +0000 (+0000) Subject: - removed '' from returns X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=2268ac60c6e2a3d4a83ed81c13e197288e0b61ee;p=infobot.git - removed '' from returns - preliminary stats for on/off-line time git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@402 c11ca15a-4712-0410-83d8-924469b57eb5 --- diff --git a/src/UserExtra.pl b/src/UserExtra.pl index d854eff..075e0c2 100644 --- a/src/UserExtra.pl +++ b/src/UserExtra.pl @@ -407,7 +407,7 @@ sub DNS { sub userCommands { # conversion: ascii. if ($message =~ /^(asci*|chr) (\d+)$/) { - return '' unless (&IsParam("allowConv")); + return unless (&IsParam("allowConv")); $arg = $2; $result = chr($arg); @@ -420,7 +420,7 @@ sub userCommands { # conversion: ord. if ($message =~ /^ord (.)$/) { - return '' unless (&IsParam("allowConv")); + return unless (&IsParam("allowConv")); $arg = $1; if (ord($arg) < 32) { @@ -438,7 +438,7 @@ sub userCommands { # hex. if ($message =~ /^hex(\s+(.*))?$/i) { - return '' unless (&IsParam("allowConv")); + return unless (&IsParam("allowConv")); my $arg = $2; if (!defined $arg) { @@ -605,8 +605,12 @@ sub userCommands { if ($message =~ /^ircstats$/i) { my $count = $ircstats{'ConnectCount'}; my $format_time = &Time2String(time() - $ircstats{'ConnectTime'}); + my $total_time = time() - $ircstats{'ConnectTime'} + $ircstats{'TotalTime'}; my $reply; + &DEBUG("ircstats: total_time => $total_time."); + &DEBUG("ircstats: offtime => $ircstats{'OffTime'}"); + foreach (keys %ircstats) { &DEBUG("ircstats: $_ => '$ircstats{$_}'."); }