diff options
author | dgp <dgp@users.sourceforge.net> | 2016-07-09 17:21:31 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2016-07-09 17:21:31 (GMT) |
commit | 3408cb4caba6bdda86ed5bd407f26f9f9fff9948 (patch) | |
tree | 2749fdf06c69cbd0027fc83117455052086b2c39 /generic/tclNamesp.c | |
parent | 3f704efe4e8c1fc7b8eff04d4a7eb80c31c7f44e (diff) | |
parent | 77e9a375ff3089711d1b2d25da3d190afc639e1e (diff) | |
download | tcl-3408cb4caba6bdda86ed5bd407f26f9f9fff9948.zip tcl-3408cb4caba6bdda86ed5bd407f26f9f9fff9948.tar.gz tcl-3408cb4caba6bdda86ed5bd407f26f9f9fff9948.tar.bz2 |
merge trunk
Diffstat (limited to 'generic/tclNamesp.c')
-rw-r--r-- | generic/tclNamesp.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index 679f60e..43f2c1a 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -4558,8 +4558,8 @@ NamespaceUpvarCmd( savedNsPtr = (Tcl_Namespace *) iPtr->varFramePtr->nsPtr; iPtr->varFramePtr->nsPtr = (Namespace *) nsPtr; otherPtr = TclObjLookupVarEx(interp, objv[0], NULL, - (TCL_NAMESPACE_ONLY | TCL_LEAVE_ERR_MSG), "access", - /*createPart1*/ 1, /*createPart2*/ 1, &arrayPtr); + (TCL_NAMESPACE_ONLY|TCL_LEAVE_ERR_MSG|TCL_AVOID_RESOLVERS), + "access", /*createPart1*/ 1, /*createPart2*/ 1, &arrayPtr); iPtr->varFramePtr->nsPtr = (Namespace *) savedNsPtr; if (otherPtr == NULL) { return TCL_ERROR; |