From ee3e8d38d8a72f9a6208088c42360f314adae8df Mon Sep 17 00:00:00 2001
From: l_samenv <l_samenv@samenv.psi.ch>
Date: Mon, 24 Feb 2025 16:31:58 +0100
Subject: [PATCH] change samenv.psi.ch to linse-c.psi.ch

---
 tcl/drivers/zcalib.tcl | 2 +-
 tcl/seainit.tcl        | 2 +-
 tcl/startup/helium.tcl | 4 ++--
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/tcl/drivers/zcalib.tcl b/tcl/drivers/zcalib.tcl
index e2fd6a5..b60df0f 100644
--- a/tcl/drivers/zcalib.tcl
+++ b/tcl/drivers/zcalib.tcl
@@ -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
diff --git a/tcl/seainit.tcl b/tcl/seainit.tcl
index f695370..c7c2c67 100644
--- a/tcl/seainit.tcl
+++ b/tcl/seainit.tcl
@@ -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:
diff --git a/tcl/startup/helium.tcl b/tcl/startup/helium.tcl
index 16024b3..c4dd61e 100644
--- a/tcl/startup/helium.tcl
+++ b/tcl/startup/helium.tcl
@@ -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
     }
   }
 }