]> git.donarmstrong.com Git - infobot.git/blobdiff - src/Modules/Kernel.pl
DumpVars2
[infobot.git] / src / Modules / Kernel.pl
index 3a978372feeaa72eb6278876337c231c6f049564..45c1190751657efce5f5fca70f7cf258ecd9bf8f 100644 (file)
@@ -12,7 +12,7 @@ sub kernelGetInfo {
 }
 
 sub Kernel {
-    my $return = "Linux kernel versions";
+    my $retval = "Linux kernel versions";
     my @now = &kernelGetInfo();
     if (!scalar @now) {
        &::msg($::who, "failed.");
@@ -32,9 +32,9 @@ sub Kernel {
        $line =~ s/ for 2.4//;
        $line =~ s/ for 2.2//;
        $line =~ s/ is: */: /;
-       $return .= ", " . $line;
+       $retval .= ", " . $line;
     }
-    &::msg($::who, $return);
+    &::performStrictReply($retval);
 }
 
 sub kernelAnnounce {