summaryrefslogtreecommitdiffstats
path: root/generic/tclPkg.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-28 15:29:36 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2016-11-28 15:29:36 (GMT)
commit5f5b7e42b2337f1fc7e33bccf2bcd8155fe968bc (patch)
tree18480a1ecaaf0ae9891296bd843a697954000fe6 /generic/tclPkg.c
parente506fbc42c805d0a6dfe2982a6169a0397aeddad (diff)
downloadtcl-5f5b7e42b2337f1fc7e33bccf2bcd8155fe968bc.zip
tcl-5f5b7e42b2337f1fc7e33bccf2bcd8155fe968bc.tar.gz
tcl-5f5b7e42b2337f1fc7e33bccf2bcd8155fe968bc.tar.bz2
slightly simpler
Diffstat (limited to 'generic/tclPkg.c')
-rw-r--r--generic/tclPkg.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclPkg.c b/generic/tclPkg.c
index c3cc54e..c8f418c 100644
--- a/generic/tclPkg.c
+++ b/generic/tclPkg.c
@@ -570,8 +570,7 @@ PkgRequireCore(
pkgFiles->names = pkgName;
code = Tcl_EvalEx(interp, script, -1, TCL_EVAL_GLOBAL);
/* Pop the "ifneeded" package name from "tclPkgFiles" assocdata*/
- pkgName = pkgFiles->names;
- pkgFiles->names = pkgFiles->names->nextPtr;
+ pkgFiles->names = pkgName->nextPtr;
ckfree(pkgName);
Tcl_Release(script);