summaryrefslogtreecommitdiff
path: root/src/if_tcl.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/if_tcl.c')
-rw-r--r--src/if_tcl.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/if_tcl.c b/src/if_tcl.c
index fe43d23ce..4b089ce5d 100644
--- a/src/if_tcl.c
+++ b/src/if_tcl.c
@@ -1564,7 +1564,9 @@ tclsetdelcmd(interp, reflist, vimobj, delcmd)
if (reflist->interp == interp && reflist->vimobj == vimobj)
{
if (reflist->delcmd)
+ {
Tcl_DecrRefCount(reflist->delcmd);
+ }
Tcl_IncrRefCount(delcmd);
reflist->delcmd = delcmd;
return TCL_OK;