diff options
| author | mdejong <mdejong> | 2002-01-25 23:06:58 (GMT) |
|---|---|---|
| committer | mdejong <mdejong> | 2002-01-25 23:06:58 (GMT) |
| commit | 727dc02ba3e05c4df81068bc3fd0ac3a8c98328b (patch) | |
| tree | 75339e2bd4ffcbce34c5e3b7c788743e68e0c163 /tests/socket.test | |
| parent | fc040221576dad87475a85d33aba99c043e39c36 (diff) | |
| download | tcl-727dc02ba3e05c4df81068bc3fd0ac3a8c98328b.zip tcl-727dc02ba3e05c4df81068bc3fd0ac3a8c98328b.tar.gz tcl-727dc02ba3e05c4df81068bc3fd0ac3a8c98328b.tar.bz2 | |
Make -eofchar and -translation options read only for
server sockets. [Bug 496733]
* generic/tclIO.c (Tcl_GetChannelOption, Tcl_SetChannelOption):
Instead of returning nothing for the -translation option
on a server socket, always return "auto". Return the empty
string enclosed in quotes for the -eofchar option on
a server socket. Fixup -eofchar usage message so that
it matches the implementation.
* tests/io.test: Add -eofchar tests and -translation tests
to ensure options are read only on server sockets.
* tests/socket.test: Update tests to account for -eofchar
and -translation option changes.
Diffstat (limited to 'tests/socket.test')
| -rw-r--r-- | tests/socket.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/socket.test b/tests/socket.test index 80b8298..cca7abb 100644 --- a/tests/socket.test +++ b/tests/socket.test @@ -10,7 +10,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: socket.test,v 1.20 2001/10/12 19:45:08 hobbs Exp $ +# RCS: @(#) $Id: socket.test,v 1.21 2002/01/25 23:06:58 mdejong Exp $ # Running socket tests with a remote server: # ------------------------------------------ @@ -847,7 +847,7 @@ test socket-7.3 {testing socket specific options} {socket} { close $s update llength $l -} 12 +} 14 test socket-7.4 {testing socket specific options} {socket} { set s [socket -server accept 0] proc accept {s a p} { |