From 2f1b48134419559be1cb75b49f4a6cab0c6b8b79 Mon Sep 17 00:00:00 2001 From: Ferdi Franceschini Date: Tue, 20 Feb 2007 16:32:21 +1100 Subject: [PATCH] Fixed variable reference in hdb_hmscan proc r1533 | ffr | 2007-02-20 16:32:21 +1100 (Tue, 20 Feb 2007) | 2 lines --- site_ansto/instrument/hrpd/config/scan/scan.tcl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/site_ansto/instrument/hrpd/config/scan/scan.tcl b/site_ansto/instrument/hrpd/config/scan/scan.tcl index 0eae2c6a..e787cb6f 100644 --- a/site_ansto/instrument/hrpd/config/scan/scan.tcl +++ b/site_ansto/instrument/hrpd/config/scan/scan.tcl @@ -1,5 +1,5 @@ namespace eval scanCommand { -#MakeScanCommand escan counter scan.hdd recover.bin + variable scanVariable scan_var scanVarStart 0 scanVarStep 1 proc scan_prepare {sobj uobj} { variable scanVarStart; @@ -107,7 +107,7 @@ proc hdb_hmscan {scanvar scanstart scanincr np mode preset} { hmscan clear hmscan configure script - hmscan add $scanvar scanstart scanincr + hmscan add $scanvar $scanstart $scanincr set status [catch {hmscan run $np $mode $preset} msg] hmscan configure soft if {$status == 0} {