diff options
| author | oehhar <harald.oehlmann@elmicron.de> | 2024-12-15 17:57:10 (GMT) |
|---|---|---|
| committer | oehhar <harald.oehlmann@elmicron.de> | 2024-12-15 17:57:10 (GMT) |
| commit | 01b4c65676f83df2bb585b51dd51f73331ff332d (patch) | |
| tree | 0d1f21d69c6f8d39954597f2061e984b9bb5f431 | |
| parent | 5d17abf924cab62cd8637659d3ba8a31a76e299a (diff) | |
| download | tcl-01b4c65676f83df2bb585b51dd51f73331ff332d.zip tcl-01b4c65676f83df2bb585b51dd51f73331ff332d.tar.gz tcl-01b4c65676f83df2bb585b51dd51f73331ff332d.tar.bz2 | |
Add explanation for fix for ticket [63449c0514]
| -rw-r--r-- | generic/tclNamesp.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index 6f24e91..65b91f1 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -3192,6 +3192,9 @@ NamespaceChildrenCmd( if (strncmp(pattern, nsPtr->fullName, length) != 0) { goto searchDone; } + /* + * Global namespace members are prefixed with "::", others not. Ticket [63449c0514] + */ if (FindChildEntry(nsPtr, (nsPtr != globalNsPtr ? 2 : 0) + pattern+length) != NULL) { Tcl_ListObjAppendElement(NULL, listPtr, Tcl_NewStringObj(pattern, -1)); |