diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-05 14:27:20 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-05 14:27:20 (GMT) |
commit | 2ba138980311e60d5317ba5ed8814e11d9c4a997 (patch) | |
tree | 33d0914dd38a59968c26095328543dbdcc537eaa /generic/tclCmdIL.c | |
parent | 52862763d3a3bc08041532e0afc9bf27ef9abbe0 (diff) | |
download | tcl-2ba138980311e60d5317ba5ed8814e11d9c4a997.zip tcl-2ba138980311e60d5317ba5ed8814e11d9c4a997.tar.gz tcl-2ba138980311e60d5317ba5ed8814e11d9c4a997.tar.bz2 |
Fix [7c7d3b4481d4e4e86420b54031f4abd1df18d64|7c7d3b4481]: load test failures. There's a difference between "" and NULL as interpreter name.
Diffstat (limited to 'generic/tclCmdIL.c')
-rw-r--r-- | generic/tclCmdIL.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/generic/tclCmdIL.c b/generic/tclCmdIL.c index ec85741..a7a5f43 100644 --- a/generic/tclCmdIL.c +++ b/generic/tclCmdIL.c @@ -1728,9 +1728,6 @@ InfoLoadedCmd( interpName = NULL; } else { /* Get pkgs just in specified interp. */ interpName = TclGetString(objv[1]); - if (!interpName[0]) { - interpName = NULL; - } } if (objc < 3) { /* Get loaded files in all packages. */ packageName = NULL; |