From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Sat, 6 Jan 2001 12:53:20 +0000 (+0000)
Subject: DNS.pl removed.
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=29ef3c1e9277fee33ed22a03d30b58e28538b685;p=infobot.git

DNS.pl removed.


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

diff --git a/blootbot/src/modules.pl b/blootbot/src/modules.pl
index 0cbfd9f..7bee1c5 100644
--- a/blootbot/src/modules.pl
+++ b/blootbot/src/modules.pl
@@ -22,7 +22,6 @@ if ($@) {
 ### MODULES.
 %myModules = (
 	"countdown"	=> "Countdown.pl",
-	"allowDNS"	=> "DNS.pl",
 	"debian"	=> "Debian.pl",
 	"debianExtra"	=> "DebianExtra.pl",
 	"dict"		=> "Dict.pl",
@@ -323,15 +322,13 @@ sub loadMyModule {
     }
 }
 
-### this chews 3megs on potato, 300 kB on slink.
-#$no_syscall = 0;
-#eval "require 'sys/syscall.ph'";
-#if ($@) {
-#    &WARN("sys/syscall.ph has not been installed//generated.
-#gettimeofday will use time() instead");
-    $no_syscall = 1;
-#}
-&showProc(" (syscall)");
+$no_timehires = 0;
+eval "use Time::HiRes qw(gettimeofday tv_interval)";
+if ($@) {
+    &WARN("No Time::HiRes?");
+    $no_timehires = 1;
+}
+&showProc(" (Time::HiRes)");
 
 sub AUTOLOAD {
     &ERROR("UNKNOWN FUNCTION CALLED: $AUTOLOAD");