X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FCommandStubs.pl;h=7da444ec790176150a434ec4afa892d43285a9a2;hb=f7cae48a17d6decd0a9bd997188271daa0a885b1;hp=3dd57151679922d3429c0c660871c35dac40bf63;hpb=5866d70957bf1bf6cc4c5cde39e628a96fed6be9;p=infobot.git

diff --git a/src/CommandStubs.pl b/src/CommandStubs.pl
index 3dd5715..7da444e 100644
--- a/src/CommandStubs.pl
+++ b/src/CommandStubs.pl
@@ -18,7 +18,7 @@ $w3search_regex   = "google";
 
 ### COMMAND HOOK IMPLEMENTATION.
 # addCmdHook("SECTION", 'TEXT_HOOK',
-#	(CODEREF	=> 'Blah', 
+#	(CODEREF	=> 'Blah',
 #	Forker		=> 1,
 #	CheckModule	=> 1,			# ???
 #	Module		=> 'blah.pl'		# preload module.
@@ -190,7 +190,7 @@ sub parseCmdHook {
 	'Forker' => 1, 'Identifier' => 'kernel',
 	'Cmdstats' => 'Kernel', 'NoArgs' => 1) );
 &addCmdHook("extra", 'listauth', ('CODEREF' => 'CmdListAuth',
-	'Identifier' => 'search', Module => 'factoids', 
+	'Identifier' => 'search', Module => 'factoids',
 	'Help' => 'listauth') );
 &addCmdHook("extra", 'quote', ('CODEREF' => 'Quote::Quote',
 	'Forker' => 1, 'Identifier' => 'quote',
@@ -248,6 +248,9 @@ sub parseCmdHook {
 	'Forker' => 1) );
 &addCmdHook("extra", '(botmail|message)', ('CODEREF' => 'botmail::parse',
 	'Identifier' => 'botmail', 'Cmdstats' => 'botmail') );
+&addCmdHook("extra", 'httpdtype', ('CODEREF' => 'HTTPDtype::HTTPDtype',
+	'Identifier' => 'httpdtype', 'Cmdstats' => 'httpdtype',
+	'Forker' => 1) );
 
 ###
 ### END OF ADDING HOOKS.
@@ -279,7 +282,7 @@ sub Modules {
 	return;
     }
 
-    my $debiancmd	 = 'conflicts?|depends?|desc|file|d?info|provides?';
+    my $debiancmd	 = 'conflicts?|depends?|desc|file|(?:d)?info|provides?';
     $debiancmd		.= '|recommends?|suggests?|maint|maintainer';
 
     if ($message =~ /^($debiancmd)(\s+(.*))?$/i) {
@@ -296,7 +299,7 @@ sub Modules {
     }
 
     # google searching. Simon++
-    if ($message =~ /^(?:search\s+)?($w3search_regex)\s+(for\s+)?['"]?(.*?)["']?\s*\?*$/i) {
+    if ($message =~ /^(?:search\s+)?($w3search_regex)\s+(?:for\s+)?['"]?(.*?)["']?\s*\?*$/i) {
 	return unless (&hasParam("wwwsearch"));
 
 	&Forker("wwwsearch", sub { &W3Search::W3Search($1,$2); } );