diff options
-rw-r--r-- | generic/tclTestObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index 3b958dd..1f8f73d 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -920,7 +920,7 @@ TestlistobjCmd( return TCL_ERROR; } if (Tcl_GetIndexFromObj(interp, objv[1], subcommands, "command", - 0, &cmdIndex) != TCL_OK) { + TCL_INDEX_TEMP_TABLE, &cmdIndex) != TCL_OK) { return TCL_ERROR; } switch(cmdIndex) { |