From 759df8855ee49f596b8b55a95b93a0ca1c9b78b7 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Sun, 27 Jan 2002 16:04:41 +0000
Subject: [PATCH] better error message

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

diff --git a/Changes b/Changes
index e96fda53..486ba2c8 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,7 @@
 27Jan02=======================================================================
 1. make save work in cron context
 2. try to get the C client to handle closes on its standard input better
+3. put some validation in cluster.pl to check that people have set it up 
 handled.
 22Jan02=======================================================================
 1. limit spot dupe checking to first 12 characters
diff --git a/perl/cluster.pl b/perl/cluster.pl
index 59ff5178..205d2fe7 100755
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -26,7 +26,7 @@ BEGIN {
 	# do some validation of the input
 	die "The directory $root doesn't exist, please RTFM" unless -d $root;
 	die "$root/local doesn't exist, please RTFM" unless -d "$root/local";
-	die "$root/local/DXVars doesn't exist, please RTFM" unless -e "$root/local/DXVars.pm";
+	die "$root/local/DXVars.pm doesn't exist, please RTFM" unless -e "$root/local/DXVars.pm";
 	
 	mkdir "$root/local_cmd" unless -e "$root/local_cmd";
 	
-- 
2.43.0