]> git.donarmstrong.com Git - infobot.git/blobdiff - src/CommandStubs.pl
uptime -> Uptime
[infobot.git] / src / CommandStubs.pl
index 6a49480f3a4097ec70b2a47862075960ee8c6646..7bf0fce0a933f5fdcca28192870a2e3a53967f21 100644 (file)
@@ -186,13 +186,13 @@ sub parseCmdHook {
 &addCmdHook("extra", 'insult', ('CODEREF' => 'Insult::Insult',
        'Forker' => 1, 'Identifier' => 'insult', 'Help' => "insult" ) );
 &addCmdHook("extra", 'kernel', ('CODEREF' => 'Kernel::Kernel',
-       'Forker' => 1, 'Identifier' => 'kernel',
+       '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',
+       'Forker' => 1, 'Identifier' => 'Quote',
        'Help' => 'quote', 'Cmdstats' => 'Quote') );
 &addCmdHook("extra", 'countdown', ('CODEREF' => 'countdown',
        'Module' => 'countdown', 'Identifier' => 'countdown',
@@ -200,15 +200,15 @@ sub parseCmdHook {
 &addCmdHook("extra", 'lart', ('CODEREF' => 'lart',
        'Identifier' => 'lart', 'Help' => 'lart') );
 &addCmdHook("extra", 'convert', ('CODEREF' => 'convert',
-       'Forker' => 1, 'Identifier' => 'units',
+       'Forker' => 1, 'Identifier' => 'Units',
        'Help' => 'convert') );
 &addCmdHook("extra", '(cookie|random)', ('CODEREF' => 'cookie',
-       'Forker' => 1, 'Identifier' => 'factoids') );
+       'Forker' => 1, 'Identifier' => 'Factoids') );
 &addCmdHook("extra", 'u(ser)?info', ('CODEREF' => 'userinfo',
        'Identifier' => 'userinfo', 'Help' => 'userinfo',
        'Module' => 'userinfo') );
-&addCmdHook("extra", 'rootWarn', ('CODEREF' => 'CmdrootWarn',
-       'Identifier' => 'rootWarn', 'Module' => 'rootwarn') );
+&addCmdHook("extra", 'RootWarn', ('CODEREF' => 'CmdrootWarn',
+       'Identifier' => 'RootWarn', 'Module' => 'RootWarn') );
 &addCmdHook("extra", 'seen', ('CODEREF' => 'seen', 'Identifier' =>
        'seen') );
 &addCmdHook("extra", 'Dict', ('CODEREF' => 'Dict::Dict',
@@ -216,11 +216,11 @@ sub parseCmdHook {
        'Forker' => 1, 'Cmdstats' => 'Dict') );
 &addCmdHook("extra", 'slashdot', ('CODEREF' => 'Slashdot::Slashdot',
        'Identifier' => 'slashdot', 'Forker' => 1,
-       'Cmdstats' => 'Slashdot') );
-&addCmdHook("extra", 'plug', ('CODEREF' => 'Plug::Plug',
-       'Identifier' => 'plug', 'Forker' => 1,
+       'Cmdstats' => 'slashdot') );
+&addCmdHook("extra", 'Plug', ('CODEREF' => 'Plug::Plug',
+       'Identifier' => 'Plug', 'Forker' => 1,
        'Cmdstats' => 'Plug') );
-&addCmdHook("extra", 'uptime', ('CODEREF' => 'uptime', 'Identifier' => 'uptime',
+&addCmdHook("extra", 'Uptime', ('CODEREF' => 'uptime', 'Identifier' => 'Uptime',
        'Cmdstats' => 'Uptime') );
 &addCmdHook("extra", 'nullski', ('CODEREF' => 'nullski', ) );
 &addCmdHook("extra", 'verstats', ('CODEREF' => 'do_verstats' ) );
@@ -256,8 +256,8 @@ sub parseCmdHook {
 &addCmdHook("extra", 'HTTPDtype', ('CODEREF' => 'HTTPDtype::HTTPDtype',
        'Identifier' => 'HTTPDtype', 'Cmdstats' => 'HTTPDtype',
        'Forker' => 1) );
-&addCmdHook("extra", 'rss', ('CODEREF' => 'Rss::Rss',
-       'Identifier' => 'rss', 'Cmdstats' => 'rss',
+&addCmdHook("extra", 'Rss', ('CODEREF' => 'Rss::Rss',
+       'Identifier' => 'Rss', 'Cmdstats' => 'Rss',
        'Forker' => 1, 'Help' => 'rss') );
 &addCmdHook("extra", 'wiki(pedia)?', ('CODEREF' => 'wikipedia::wikipedia',
        'Identifier' => 'wikipedia', 'Cmdstats' => 'wikipedia',
@@ -307,8 +307,8 @@ sub Modules {
 
     # text counters. (eg: hehstats)
     my $itc;
-    $itc = &getChanConf("ircTextCounters");
-    $itc = &findChanConf("ircTextCounters") unless ($itc);
+    $itc = &getChanConf('ircTextCounters');
+    $itc = &findChanConf('ircTextCounters') unless ($itc);
     return if ($itc && &do_text_counters($itc) == 1);
     # end of text counters.
 
@@ -320,26 +320,26 @@ sub Modules {
        my $args        = $3 || "";
 
        $thiscmd        =~ s/^vals$/values/;
-       return if ($thiscmd ne "keys" && $thiscmd ne "values");
+       return if ($thiscmd ne 'keys' && $thiscmd ne 'values');
 
        # Usage:
        if (!defined $args or $args =~ /^\s*$/) {
-           &help("list". $thiscmd);
+           &help('list'. $thiscmd);
            return;
        }
 
        # suggested by asuffield and \broken.
        if ($args =~ /^["']/ and $args =~ /["']$/) {
-           &DEBUG("list*: removed quotes.");
+           &DEBUG('list*: removed quotes.');
            $args       =~ s/^["']|["']$//g;
        }
 
-       if (length $args < 2 && &IsFlag("o") ne "o") {
-           &msg($who, "search string is too short.");
+       if (length $args < 2 && &IsFlag('o') ne 'o') {
+           &msg($who, 'search string is too short.');
            return;
        }
 
-       &Forker("search", sub { &Search::Search($thiscmd, $args); } );
+       &Forker('Search', sub { &Search::Search($thiscmd, $args); } );
 
        $cmdstats{'Factoid Search'}++;
        return;
@@ -410,7 +410,7 @@ sub Modules {
     # Topic management. xk++
     # may want to add a userflags for topic. -xk
     if ($message =~ /^topic(\s+(.*))?$/i) {
-       return unless (&hasParam("topic"));
+       return unless (&hasParam('Topic'));
 
        my $chan        = $talkchannel;
        my @args        = split / /, $2 || "";
@@ -449,7 +449,7 @@ sub Modules {
        }
 
        # now lets do it.
-       &loadMyModule($myModules{'topic'});
+       &loadMyModule($myModules{'Topic'});
        &Topic($chan, $thiscmd, join(' ', @args));
        $cmdstats{'Topic'}++;
        return;