Implemented ::scan::pre_hmm_scan_prepare hook to make sure that the chopper is ready before commencing a scan.
r2208 | ffr | 2007-10-31 17:05:15 +1100 (Wed, 31 Oct 2007) | 2 lines
This commit is contained in:
committed by
Douglas Clowes
parent
5b5b3b4cc8
commit
f7d01ceb6b
@@ -1 +1,9 @@
|
||||
source $cfPath(scan)/scan_common_1.tcl
|
||||
source $cfPath(scan)/scan_common_1.tcl
|
||||
##
|
||||
# @brief Make sure that the chopper is ready before starting a scan.
|
||||
proc ::scan::pre_hmm_scan_prepare {} {
|
||||
if [catch {::chopper::ready?} errmsg] {
|
||||
return -code error $errmsg
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user