change samenv.psi.ch to linse-c.psi.ch
This commit is contained in:
@ -4,7 +4,7 @@
|
||||
#
|
||||
# makenv calib -driver zcalib
|
||||
#
|
||||
# see also: http://samenv.psi.ch:8080/sample_environment/83
|
||||
# see also: http://linse-c.psi.ch:8080/sample_environment/83
|
||||
|
||||
namespace eval zcalib {
|
||||
variable buf
|
||||
|
@ -130,7 +130,7 @@ if {$instrument eq "seaman"} {
|
||||
source stdsct.tcl
|
||||
source seacom.tcl
|
||||
source remob.tcl
|
||||
stdConfig::make -name seaman -driver seaclient -port samenv:3001 -permanent 1
|
||||
stdConfig::make -name seaman -driver seaclient -port linse-c:3001 -permanent 1
|
||||
startAutodeviceCron
|
||||
if {[silent 0 result instconfig stickrot] == 1} {
|
||||
# enable stickrot:
|
||||
|
@ -15,9 +15,9 @@ proc helium_register {ctrl node {vessel none}} {
|
||||
}
|
||||
$ctrl updatescript $node "helium_update $p $instrument $label"
|
||||
if {[sicsdescriptor $p] eq "notfound"} {
|
||||
stdConfig::make -name $p -driver seaclient -port samenv:8640 -permanent 2
|
||||
stdConfig::make -name $p -driver seaclient -port linse-c:8640 -permanent 2
|
||||
catch {seaclient_list makeitem $p}
|
||||
# stdConfig::make -name $p -driver seaclient -port samenv:8640 -permanent 0
|
||||
# stdConfig::make -name $p -driver seaclient -port linse-c:8640 -permanent 0
|
||||
}
|
||||
}
|
||||
}
|
||||
|
Reference in New Issue
Block a user