% proc tst {args} {puts "started $args"}

% socket -server tst -myaddr 0.0.0.0 80
sock8456cd8

% update; # after "telnet localhost 80"
started sock84d04c8 127.0.0.1 36265

% chan configure sock8456cd8; #query the socket settings
-blocking 1 -buffering full -buffersize 4096 -encoding utf-8 -eofchar {} -translation auto -sockname {0.0.0.0 0.0.0.0 80}

% chan configure sock8456cd8 -blocking 1 -buffering full -buffersize 4096 -encoding utf-8 -eofchar {} -translation auto; #configure the socket with exact same settings as it was configured

% update; # after "telnet localhost 80"
% #no output