diff options
Diffstat (limited to 'generic/tclIORTrans.c')
| -rw-r--r-- | generic/tclIORTrans.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclIORTrans.c b/generic/tclIORTrans.c index 42c62a4..81345dc 100644 --- a/generic/tclIORTrans.c +++ b/generic/tclIORTrans.c @@ -1021,7 +1021,7 @@ ReflectClose( if (!rtPtr->dead) { rtmPtr = GetReflectedTransformMap(rtPtr->interp); - hPtr = Tcl_FindHashEntry(&rtmPtr->map, Tcl_GetString(rtPtr->handle)); + hPtr = Tcl_FindHashEntry(&rtmPtr->map, TclGetString(rtPtr->handle)); if (hPtr) { Tcl_DeleteHashEntry(hPtr); } |