X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fwatchdbg;h=84a74c8fd399a0d6644658605d6e735b79968bf4;hb=885bc3cf15da32c95eeff4e520d8f8ccc08946fa;hp=348ac8fe7bbbe5ab49101d635c429b9a66113ed3;hpb=fa1d72231582596cf22c753154269b5b0a6f1c61;p=spider.git

diff --git a/perl/watchdbg b/perl/watchdbg
index 348ac8fe..84a74c8f 100755
--- a/perl/watchdbg
+++ b/perl/watchdbg
@@ -11,6 +11,7 @@
 #
 
 require 5.004;
+package main;
 
 # search local then perl directories
 BEGIN {
@@ -22,6 +23,8 @@ BEGIN {
 	unshift @INC, "$root/local";
 }
 
+$data = "$root/data";
+
 use IO::File;
 use DXVars;
 use DXUtil;