fix address in luft.tclsh
This commit is contained in:
@@ -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"
|
||||
|
||||
Reference in New Issue
Block a user