--- a/checkfiles1 Thu Nov 21 14:01:21 2013 +0000
+++ b/checkfiles1 Fri Jul 03 10:25:08 2020 -0400
@@ -2,9 +2,9 @@
#======================================================================
# C H E C K F I L E S 1
# doc: Wed Mar 10 22:23:52 2004
-# dlm: Thu Aug 26 00:26:00 2010
+# dlm: Fri Jul 3 10:13:20 2020
# (c) 2004 A.M. Thurnherr
-# uE-Info: 26 39 NIL 0 0 72 2 2 8 NIL ofnI
+# uE-Info: 19 36 NIL 0 0 72 2 2 8 NIL ofnI
#======================================================================
# HISTORY:
@@ -16,6 +16,7 @@
# Nov 19, 2008: - added version
# Aug 25, 2010: - DEFAULTS.expect -> CRUISE_SETUP.expect
# - libBB.expect -> libRDI.expect
+# Jul 3, 2020: - expunged master/slave terminology
#----------------------------------------------------------------------
# Setup
@@ -45,8 +46,8 @@
send_user "\nGetting station number...";
set deployment_name [get_deployment_name];
-if {[scan $deployment_name $master_deployment_name_fmt stn] != 1} {
- send_error "$deployment_name $master_deployment_name_fmt";
+if {[scan $deployment_name $DL_deployment_name_fmt stn] != 1} {
+ send_error "$deployment_name $DL_deployment_name_fmt";
error "Can't get station number";
}
set stnstr [format $stn_format $stn];
@@ -70,10 +71,10 @@
send_user "\nChecking data file...\n";
set_color 0;
-check_data [format %s000.000 [format $master_deployment_name_fmt $stn]];
+check_data [format %s000.000 [format $DL_deployment_name_fmt $stn]];
set_color;
send_user "Backing up data file...";
-backup_master_data $stn;
+backup_DL_data $stn;
send_user "\nDone\n"