From 8b61b3a7d14ca4794f92c36a67827264bc5e86d1 Mon Sep 17 00:00:00 2001
From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Tue, 2 Feb 2010 01:26:39 +0000
Subject: [PATCH] conninfo

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@1882 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/UserExtra.pl | 5 +++++
 1 file changed, 5 insertions(+)

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(@_);
-- 
2.39.2