From 640085346e039acba08e9e2a227fa23d74ca95a8 Mon Sep 17 00:00:00 2001
From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Tue, 20 Feb 2001 12:59:40 +0000
Subject: [PATCH] minor updates, warn fixes, removed comments

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@408 c11ca15a-4712-0410-83d8-924469b57eb5
---
 blootbot/src/CommandStubs.pl | 2 +-
 blootbot/src/core.pl         | 5 -----
 blootbot/src/modules.pl      | 2 +-
 3 files changed, 2 insertions(+), 7 deletions(-)

diff --git a/blootbot/src/CommandStubs.pl b/blootbot/src/CommandStubs.pl
index 748ee2b..26e3b3e 100644
--- a/blootbot/src/CommandStubs.pl
+++ b/blootbot/src/CommandStubs.pl
@@ -346,7 +346,7 @@ sub Modules {
 	return unless (&hasParam("topic"));
 
 	my $chan	= $talkchannel;
-	my @args	= split(/ /, $2);
+	my @args	= split / /, $2 || "";
 
 	if (!scalar @args) {
 	    &msg($who,"Try 'help topic'");
diff --git a/blootbot/src/core.pl b/blootbot/src/core.pl
index b75fb1d..4d5363e 100644
--- a/blootbot/src/core.pl
+++ b/blootbot/src/core.pl
@@ -130,14 +130,9 @@ sub ChanConfList {
     return unless (defined $param);
     my %chan	= &getChanConfList($param);
 
-    # what if we have it set on _default and a few channels with
-    # negative set? perhaps we should disable -blah settings to remove
-    # this mess.
-
     if (exists $chan{_default}) {
 	return keys %chanconf;
     } else {
-	### TODO: -option is included aswell though.
 	return keys %chan;
     }
 }
diff --git a/blootbot/src/modules.pl b/blootbot/src/modules.pl
index e170077..fa93df4 100644
--- a/blootbot/src/modules.pl
+++ b/blootbot/src/modules.pl
@@ -189,7 +189,7 @@ sub loadMyModulesNow {
 
 	if (!&IsParam($_) and !&IsChanConf($_)) {
 	    if (exists $myModules{$_}) {
-		&DEBUG("myModule: $myModules{$_} (1) not loaded.");
+		&status("myModule: $myModules{$_} (1) not loaded.");
 	    } else {
 		&DEBUG("myModule: $_ (2) not loaded.");
 	    }
-- 
2.39.5