From: Dirk Koopman <djk@tobit.co.uk>
Date: Wed, 22 Apr 2020 17:43:28 +0000 (+0100)
Subject: fix modules search path in update_sysop.pl
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=4a47ee8996cd52566856a06476eb74aea02d68ac;p=spider.git

fix modules search path in update_sysop.pl

This means it will work even if not called from /spider/perl.
---

diff --git a/Changes b/Changes
index fa558299..e921da8d 100644
--- a/Changes
+++ b/Changes
@@ -1,3 +1,9 @@
+22Apr20=======================================================================
+1. Fix the module search path in update_sysop.pl
+21Apr20=======================================================================
+1. Finally fix the "actually tranmit" any output (like from 'logout' files)
+   to users before disconnecting. This also means that disconnecting nodes
+   now receive the (totally redundant, but hey) PC39 reason for disconnection.
 20Apr20=======================================================================
 1. Speed up sh/log (including chat, rcmd, ann etc) that search the system
    log files, by removing a completely redundant subsystem and also leveraging
diff --git a/perl/update_sysop.pl b/perl/update_sysop.pl
index 666a7d5d..74d6812a 100755
--- a/perl/update_sysop.pl
+++ b/perl/update_sysop.pl
@@ -19,6 +19,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";
 }