From: timriker Date: Tue, 2 Feb 2010 01:26:39 +0000 (+0000) Subject: conninfo X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8b61b3a7d14ca4794f92c36a67827264bc5e86d1;p=infobot.git conninfo git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@1882 c11ca15a-4712-0410-83d8-924469b57eb5 --- diff --git a/src/UserExtra.pl b/src/UserExtra.pl index 47551b5..f11f592 100644 --- a/src/UserExtra.pl +++ b/src/UserExtra.pl @@ -173,6 +173,11 @@ sub cmdstats { &performStrictReply( 'command usage include ' . &IJoin(@array) . '.' ); } +# Command statistics. +sub conninfo { + &performStrictReply( 'connection info ' . &IJoin(sort keys %::conns) ); +} + # Factoid extension info. xk++ sub factinfo { my $faqtoid = lc shift(@_);