diff options
author | ferrieux <ferrieux@users.sourceforge.net> | 2012-04-30 21:31:14 (GMT) |
---|---|---|
committer | ferrieux <ferrieux@users.sourceforge.net> | 2012-04-30 21:31:14 (GMT) |
commit | 76c81b20b6039773ba19982279d04dbf2306cc68 (patch) | |
tree | 6c7a3a683e0a5e5bfcc9e57775713436e3a30d35 | |
parent | eb6dd9387d7673385d60a6dbf6c24b4f1123706c (diff) | |
download | tcl-76c81b20b6039773ba19982279d04dbf2306cc68.zip tcl-76c81b20b6039773ba19982279d04dbf2306cc68.tar.gz tcl-76c81b20b6039773ba19982279d04dbf2306cc68.tar.bz2 |
Fix a nesting bug in the message-passing protocol to Tcl_SetChannelError in one case.
-rw-r--r-- | generic/tclIO.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index 0f2aa28..bac4c17 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -2118,7 +2118,7 @@ Tcl_GetChannelHandle( chanPtr = ((Channel *) chan)->state->bottomChanPtr; if (!chanPtr->typePtr->getHandleProc) { Tcl_SetChannelError(chan, Tcl_ObjPrintf( - "channel \"%s\" does not support OS handles", + "{channel \"%s\" does not support OS handles}", Tcl_GetChannelName(chan))); return TCL_ERROR; } |