SICS-587 (in progress) Get host and port from the HISTMEM_HOSTPORT

dictionary.
This commit is contained in:
Ferdi Franceschini
2013-04-23 16:54:09 +10:00
parent e28ef59bd0
commit bdf1c24c57

View File

@@ -1539,7 +1539,9 @@ proc ::histogram_memory::ic_initialize {} {
# FAT_TABLE -set VIEW_MAG_X -1 VIEW_MAG_Y -1
foreach hm_obj [sicslist type histmem] {
$hm_obj configure hmaddress http://das1-[instname].nbi.ansto.gov.au:8080
set host [dict get $::HISTMEM_HOSTPORT HMM HOST]
set port [dict get $::HISTMEM_HOSTPORT HMM PORT]
$hm_obj configure hmaddress http://$host:$port
$hm_obj configure username SICS
$hm_obj configure password SICS
$hm_obj configure histmode transparent