From: timriker <timriker@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Thu, 18 Nov 2004 07:49:46 +0000 (+0000)
Subject: BZFlag cleanup
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a4f1ae92a1a9f9fcfc5b6f3dc960c629e074f424;p=infobot.git

BZFlag cleanup


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@1038 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/files/sample/blootbot.chan b/files/sample/blootbot.chan
index 44840f9..b747a0e 100644
--- a/files/sample/blootbot.chan
+++ b/files/sample/blootbot.chan
@@ -22,7 +22,7 @@
 _default
     +allowConv
     +allowDNS
-    +bzflag
+    +BZFlag
     +chanlimitcheck
     chanlimitcheckInterval 10
     chanlimitcheckPlus 10
diff --git a/src/CommandStubs.pl b/src/CommandStubs.pl
index fd10ecd..09cd884 100644
--- a/src/CommandStubs.pl
+++ b/src/CommandStubs.pl
@@ -232,14 +232,14 @@ sub parseCmdHook {
 	'Identifier' => 'weather', 'Help' => 'weather',
 	'Cmdstats' => 'weather', 'Forker' => 1) );
 &addCmdHook("extra", 'bzflist', ('CODEREF' => 'BZFlag::list',
-	'Identifier' => 'bzflag', 'Cmdstats' => 'BZFlag',
+	'Identifier' => 'BZFlag', 'Cmdstats' => 'BZFlag',
 	'Forker' => 1) );
 &addCmdHook("extra", 'bzflist17', ('CODEREF' => 'BZFlag::list17',
-	'Identifier' => 'bzflag', 'Cmdstats' => 'BZFlag',
+	'Identifier' => 'BZFlag', 'Cmdstats' => 'BZFlag',
 	'Forker' => 1) );
 &addCmdHook("extra", 'bzfquery', ('CODEREF' => 'BZFlag::query',
-	'Identifier' => 'bzflag', 'Cmdstats' => 'BZFlag',
-	'Forker' => 1, 'Help' => 'bzflag') );
+	'Identifier' => 'BZFlag', 'Cmdstats' => 'BZFlag',
+	'Forker' => 1) );
 &addCmdHook("extra", 'zfi', ('CODEREF' => 'zfi::query',
 	'Identifier' => 'zfi', 'Cmdstats' => 'zfi',
 	'Forker' => 1) );
diff --git a/src/Modules/BZFlag.pl b/src/Modules/BZFlag.pl
index c52d07e..26ce457 100755
--- a/src/Modules/BZFlag.pl
+++ b/src/Modules/BZFlag.pl
@@ -24,7 +24,7 @@ BEGIN {
 	$no_BZFlag++ if ($@);
 }
 
-sub BZFlag::BZFlag {
+sub BZFlag {
 	my ($message) = @_;
 	my ($retval);
 	if ($no_BZFlag) {
@@ -41,7 +41,7 @@ sub BZFlag::BZFlag {
 	&::performStrictReply($retval);
 }
 
-sub BZFlag::list {
+sub list {
 	my ($response);
 	my $ua = new LWP::UserAgent;
 	$ua->proxy('http', $::param{'httpProxy'}) if (&::IsParam("httpProxy"));
@@ -76,7 +76,7 @@ sub BZFlag::list {
 	return;
 }
 
-sub BZFlag::list17 {
+sub list17 {
 	my ($response);
 	my $ua = new LWP::UserAgent;
 	$ua->proxy('http', $::param{'httpProxy'}) if (&::IsParam("httpProxy"));
@@ -113,7 +113,7 @@ sub BZFlag::list17 {
 	return;
 }
 
-sub BZFlag::querytext {
+sub querytext {
 	my ($servernameport) = @_;
 	my ($servername,$port) = split(":",$servernameport);
 	if ($no_BZFlag) {
@@ -280,7 +280,7 @@ sub BZFlag::querytext {
 	return $response;
 }
 
-sub BZFlag::query {
+sub query {
 	my ($servernameport) = @_;
 	&::performStrictReply(&querytext($servernameport));
 	return;
diff --git a/src/modules.pl b/src/modules.pl
index 0fcf722..be65dce 100644
--- a/src/modules.pl
+++ b/src/modules.pl
@@ -24,7 +24,7 @@ if ($@) {
 %myModules = (
 	"babelfish"	=> "babel.pl",
 	"botmail"	=> "botmail.pl",
-	"bzflag"	=> "BZFlag.pl",
+	"BZFlag"	=> "BZFlag.pl",
 	"countdown"	=> "Countdown.pl",
 	"debian"	=> "Debian.pl",
 	"debianExtra"	=> "DebianExtra.pl",