diff options
author | pooryorick <com.digitalsmarties@pooryorick.com> | 2020-09-01 22:36:41 (GMT) |
---|---|---|
committer | pooryorick <com.digitalsmarties@pooryorick.com> | 2020-09-01 22:36:41 (GMT) |
commit | 008cd7d2a99f93f590fdefbea117b9f78d03b4ce (patch) | |
tree | 3f22b48ea94ee3393cca98439bd1abf9c6c21810 /generic/tclObj.c | |
parent | d99566171273e05f659f3f4f364b9d1948ec8565 (diff) | |
download | tcl-008cd7d2a99f93f590fdefbea117b9f78d03b4ce.zip tcl-008cd7d2a99f93f590fdefbea117b9f78d03b4ce.tar.gz tcl-008cd7d2a99f93f590fdefbea117b9f78d03b4ce.tar.bz2 |
Fix for [c1a376375e0e6488], imported namespace ensemble command name distorted
during deletion trace on the import
Diffstat (limited to 'generic/tclObj.c')
-rw-r--r-- | generic/tclObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c index dbe6686..44b2785 100644 --- a/generic/tclObj.c +++ b/generic/tclObj.c @@ -4667,7 +4667,7 @@ SetCmdNameFromAny( * report the failure to find the command as an error. */ - if (cmdPtr == NULL) { + if (cmdPtr == NULL || !TclRoutineHasName(cmdPtr)) { return TCL_ERROR; } |