X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2Fmodules.pl;h=7de063a38d22f412a991e8926d387c041171cb03;hb=f7cae48a17d6decd0a9bd997188271daa0a885b1;hp=3dbda5825fb3ca73d2f545fa3ee823ab5b7967d5;hpb=021e48e3ae3ac2aeeebf1662e4ff3a41a750f0b7;p=infobot.git

diff --git a/src/modules.pl b/src/modules.pl
index 3dbda58..7de063a 100644
--- a/src/modules.pl
+++ b/src/modules.pl
@@ -55,6 +55,7 @@ if ($@) {
 	"zippy"		=> "Zippy.pl",
 	"zsi"		=> "zsi.pl",
 	"botmail"	=> "botmail.pl",
+	"httpdtype"	=> "HTTPDtype.pl",
 );
 ### THIS IS NOT LOADED ON RELOAD :(
 my @myModulesLoadNow;
@@ -157,7 +158,7 @@ sub loadIRCModules {
 	    &ERROR("require \"$mod\" => $@");
 	    &shutdown();
 	    exit 1;
-        }
+	}
 
 	$moduleAge{$mod} = (stat $mod)[9];
 	&showProc(" ($_)") if (&IsParam("DEBUG"));
@@ -203,7 +204,7 @@ sub reloadAllModules {
 
     # obscure usage of map and regex :)
     foreach (map { s/.*?\/?src/src/; $_ } keys %moduleAge) {
-        $retval .= &reloadModule($_);
+	$retval .= &reloadModule($_);
     }
 
     &VERB("Module: reloading done.",2);
@@ -303,7 +304,7 @@ sub loadMyModule {
     my ($tmp) = @_;
     if (!defined $tmp) {
 	&WARN("loadMyModule: module is NULL.");
-	return 0; 
+	return 0;
     }
 
     my ($modulename, $modulebase);
@@ -387,8 +388,8 @@ sub getPerlFiles {
     my($dir) = @_;
 
     if (!opendir(DIR, $dir)) {
-        &ERROR("Cannot open source directory ($dir): $!");
-        exit 1;
+	&ERROR("Cannot open source directory ($dir): $!");
+	exit 1;
     }
 
     my @mods;