add CTY-1909 prefixes

[spider.git] / perl / create_sysop.pl

diff --git a/perl/create_sysop.pl b/perl/create_sysop.pl
index c59358b612dea4efa99f2e44e555617c4ca83bcf..22b64d71ee6f277c94a76d8da77f9137941789ee 100755 (executable)
--- a/perl/create_sysop.pl
+++ b/perl/create_sysop.pl
@@ -15,6 +15,7 @@ BEGIN {
        $root = "/spider"; 
        $root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
 
+       unshift @INC, "$root/perl"; # this IS the right way round!
        unshift @INC, "$root/local";
 }