X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FUserExtra.pl;h=5215bb0942735bee10458069e6daf94cd87ff08b;hb=d150b9c85eaedead7ca2383633a56512ee512c20;hp=47551b5f88f32cee8217c87d3aa19c7278fe00e3;hpb=dd3a610c735093c82495a37a26a6353fd776dc43;p=infobot.git

diff --git a/src/UserExtra.pl b/src/UserExtra.pl
index 47551b5..5215bb0 100644
--- a/src/UserExtra.pl
+++ b/src/UserExtra.pl
@@ -170,7 +170,21 @@ sub cmdstats {
             push( @array, "\002$int\002 of $_" );
         }
     }
-    &performStrictReply( 'command usage include ' . &IJoin(@array) . '.' );
+    &performStrictReply( 'command usage includes ' . &IJoin(@array) . '.' );
+}
+
+# Command statistics.
+sub conninfo {
+    my $reply = 'conninfo:';
+    my $key;
+    foreach $key ( sort keys %::conns ) {
+        my $myconn = $::conns{$key};
+	$reply .= " $key/";
+	next if (!defined $myconn);
+        my $mynick = $myconn->nick();
+	$reply .= "$mynick";
+    }
+    &performStrictReply( "conninfo: $reply.");
 }
 
 # Factoid extension info. xk++
@@ -517,6 +531,8 @@ sub userCommands {
 
         &status("USER reload $who");
         &performStrictReply('reloading...');
+        &readUserFile();
+        &readChanFile();
         my $modules = &reloadAllModules();
         &performStrictReply("reloaded:$modules");
         return;