From e637d28f26ba92ea69edb06c6c564e1acfffd75e Mon Sep 17 00:00:00 2001
From: Dirk Koopman <djk@tobit.co.uk>
Date: Sat, 11 Dec 2021 19:06:12 +0000
Subject: [PATCH] force node to chir to $root

---
 Changes         | 1 +
 perl/cluster.pl | 3 +++
 2 files changed, 4 insertions(+)

diff --git a/Changes b/Changes
index ba3713da..44ac206c 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,6 @@
 11Dec21=======================================================================
 1. Removed dependency on perl Git package.
+2. Force code to change directory to $DXSPIDER_ROOT || '/spider'.
 10Dec21=======================================================================
 1. Fix the output of set/dxgrid, set/usstate and set/dxcq or set/dxitu to how
    it was always supposed to be since 2003.
diff --git a/perl/cluster.pl b/perl/cluster.pl
index b942b44f..db05800f 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -90,6 +90,7 @@ BEGIN {
 	
 }
 
+
 use DXVars;
 use SysVar;
 
@@ -478,6 +479,8 @@ sub setup_start
 	#
 	#############################################################
 
+	chdir $root;
+	
 	$starttime = $systime = time;
 	$systime_days = int ($systime / 86400);
 	$systime_daystart = $systime_days * 86400;
-- 
2.34.1