projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
69ffad6
)
better error message
author
minima
<minima>
Sun, 27 Jan 2002 16:04:41 +0000
(16:04 +0000)
committer
minima
<minima>
Sun, 27 Jan 2002 16:04:41 +0000
(16:04 +0000)
Changes
patch
|
blob
|
history
perl/cluster.pl
patch
|
blob
|
history
diff --git
a/Changes
b/Changes
index e96fda535c8e3c9fe15d8b6b06b826fa0b28bc63..486ba2c85b29a7305e74bc6739421d99cbfbac12 100644
(file)
--- 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
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
handled.
22Jan02=======================================================================
1. limit spot dupe checking to first 12 characters
diff --git
a/perl/cluster.pl
b/perl/cluster.pl
index 59ff51782a9a5f5b06bef219ec871a28ab8b9f85..205d2fe7633060eac89f6df4f7d329b775b75e33 100755
(executable)
--- 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";
# 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";
mkdir "$root/local_cmd" unless -e "$root/local_cmd";