summaryrefslogtreecommitdiffstats
path: root/generic/tclDictObj.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-02 11:35:12 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2019-09-02 11:35:12 (GMT)
commitdbdb35e20eceb44dfbc8c9ecba30f5fdf75aac4e (patch)
tree28f593494c36853a5c83efca223436497ea6fdd6 /generic/tclDictObj.c
parentf5daf732027b809b722b7d638388c69589a9dead (diff)
parent4376455cb3f94b4d49e5dd9a42fc1c4549fc23e5 (diff)
downloadtcl-dbdb35e20eceb44dfbc8c9ecba30f5fdf75aac4e.zip
tcl-dbdb35e20eceb44dfbc8c9ecba30f5fdf75aac4e.tar.gz
tcl-dbdb35e20eceb44dfbc8c9ecba30f5fdf75aac4e.tar.bz2
Merge 8.7
Diffstat (limited to 'generic/tclDictObj.c')
-rw-r--r--generic/tclDictObj.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclDictObj.c b/generic/tclDictObj.c
index bb552bf..404acdb 100644
--- a/generic/tclDictObj.c
+++ b/generic/tclDictObj.c
@@ -3301,7 +3301,7 @@ DictUpdateCmd(
}
if (objPtr == NULL) {
/* ??? */
- Tcl_UnsetVar(interp, TclGetString(objv[i+1]), 0);
+ Tcl_UnsetVar2(interp, TclGetString(objv[i+1]), NULL, 0);
} else if (Tcl_ObjSetVar2(interp, objv[i+1], NULL, objPtr,
TCL_LEAVE_ERR_MSG) == NULL) {
TclDecrRefCount(dictPtr);