From 1a5ebd393d64e96815cb480101a97ba865bd65cf Mon Sep 17 00:00:00 2001
From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Sat, 6 Jan 2001 12:53:20 +0000
Subject: [PATCH] DNS.pl removed.

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@229 c11ca15a-4712-0410-83d8-924469b57eb5
---
 src/modules.pl | 17 +++++++----------
 1 file changed, 7 insertions(+), 10 deletions(-)

diff --git a/src/modules.pl b/src/modules.pl
index 0cbfd9f..7bee1c5 100644
--- a/src/modules.pl
+++ b/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");
-- 
2.39.5