summaryrefslogtreecommitdiffstats
path: root/win
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-05-08 09:07:07 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-05-08 09:07:07 (GMT)
commit8622e716bb6d347375ac273af7b73c6f7952f223 (patch)
tree1b4f08124e5aa678ebee8eb014791f26bc3ffc42 /win
parentcfc88759ab9d2a7118cb286943fc3074b430804b (diff)
downloadtcl-8622e716bb6d347375ac273af7b73c6f7952f223.zip
tcl-8622e716bb6d347375ac273af7b73c6f7952f223.tar.gz
tcl-8622e716bb6d347375ac273af7b73c6f7952f223.tar.bz2
fix test-cases winDde 5.1 and 5.3
Diffstat (limited to 'win')
-rw-r--r--win/tclWinDde.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/win/tclWinDde.c b/win/tclWinDde.c
index e917570..83c2aa3 100644
--- a/win/tclWinDde.c
+++ b/win/tclWinDde.c
@@ -1253,7 +1253,7 @@ DdeObjCmd(
} else if (objc >= 6 && objc <= 7) {
firstArg = objc - 3;
for (i = 2; i < firstArg; i++) {
- if (Tcl_GetIndexFromObj(NULL, objv[2], ddeExecOptions,
+ if (Tcl_GetIndexFromObj(interp, objv[2], ddeExecOptions,
"option", 0, &argIndex) != TCL_OK) {
return TCL_ERROR;
}