Cleanup and add "histmem loadconf" feedback
r2843 | ffr | 2009-12-10 18:29:23 +1100 (Thu, 10 Dec 2009) | 2 lines
This commit is contained in:
committed by
Douglas Clowes
parent
b6ed01fc13
commit
82475e1dec
@@ -1,5 +1,5 @@
|
||||
# $Revision: 1.47 $
|
||||
# $Date: 2009-11-24 22:56:46 $
|
||||
# $Revision: 1.48 $
|
||||
# $Date: 2009-12-10 07:29:23 $
|
||||
# Author: Ferdi Franceschini
|
||||
# Based on the examples in the hs_test.tcl sample configuration by Mark Lesha.
|
||||
# http://gumtree.ansto.gov.au:9080/nbicms/bragg-systems/histogram-server/hs_test.tcl/view
|
||||
@@ -1278,9 +1278,9 @@ proc ::histogram_memory::upload_config {filler_defaults} {
|
||||
# set nch [number_of_channels $axis]
|
||||
# OAT_TABLE $axis -setdata BOUNDARIES [calc_boundaries $bins $nch]
|
||||
# }
|
||||
clientput "histmem configuration uploaded"
|
||||
} message ] {
|
||||
if {$::errorCode=="NONE"} {
|
||||
clientput "histmem configuration uploaded"
|
||||
return $message
|
||||
} else {
|
||||
return -code error "([info level 0]) $message"
|
||||
|
||||
Reference in New Issue
Block a user