fix address in luft.tclsh

This commit is contained in:
2025-08-21 17:10:45 +02:00
parent 4bc2337ea2
commit 4ca6748147

View File

@@ -74,7 +74,7 @@ if {$sea(debug) eq "1"} {
}
# connect to sea server prep0
set sea(sock) [socket samenv.psi.ch 8640]
set sea(sock) [socket linse-c.psi.ch 8640]
fileevent $sea(sock) readable readsea
if {$sea(debug)} {
seacom "seauser seaser"