unshift @INC, "$root/perl"; # this IS the right way round!
unshift @INC, "$root/local";
+
+# require Exporter;
+# $Exporter::Verbose = 1;
}
use Msg;
use DXVars;
+use DXDebug;
+use DXLog;
use DXUtil;
use DXChannel;
use DXUser;
use DXProt;
use DXMsg;
use DXCluster;
-use DXDebug;
use DXCron;
use DXConnect;
use Prefix;
#############################################################
# open the debug file, set various FHs to be unbuffered
-dbginit($debugfn);
foreach (@debug) {
dbgadd($_);
}