diff options
author | fvogel <fvogelnew1@free.fr> | 2016-07-31 09:42:24 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2016-07-31 09:42:24 (GMT) |
commit | a15045e51ff3456a2c00be76c20ec25c70e7e25b (patch) | |
tree | b00d3e5df3f94869edf90e16207c7c6655209ecc /generic/tkWindow.c | |
parent | f661544bb3719c71d755ff14865a21cc812beb16 (diff) | |
download | tk-a15045e51ff3456a2c00be76c20ec25c70e7e25b.zip tk-a15045e51ff3456a2c00be76c20ec25c70e7e25b.tar.gz tk-a15045e51ff3456a2c00be76c20ec25c70e7e25b.tar.bz2 |
Fix for [3512539fff] removed, by popular demand
Diffstat (limited to 'generic/tkWindow.c')
-rw-r--r-- | generic/tkWindow.c | 11 |
1 files changed, 2 insertions, 9 deletions
diff --git a/generic/tkWindow.c b/generic/tkWindow.c index a55c867..0c60321 100644 --- a/generic/tkWindow.c +++ b/generic/tkWindow.c @@ -1133,12 +1133,10 @@ Tk_CreateWindowFromPath( /* * Strip the parent's name out of pathName (it's everything up to the last - * dot). There are three tricky parts: (a) must copy the parent's name + * dot). There are two tricky parts: (a) must copy the parent's name * somewhere else to avoid modifying the pathName string (for large names, * space for the copy will have to be malloc'ed); (b) must special-case - * the situation where the parent is "."; (c) the parent's name cannot be - * only 1 character long because it should include both a leading dot and - * at least one additional character. + * the situation where the parent is ".". */ p = strrchr(pathName, '.'); @@ -1157,11 +1155,6 @@ Tk_CreateWindowFromPath( if (numChars == 0) { *p = '.'; p[1] = '\0'; - } else if (numChars == 1) { - Tcl_SetObjResult(interp, Tcl_ObjPrintf( - "bad window path name \"%s\"", pathName)); - Tcl_SetErrorCode(interp, "TK", "VALUE", "WINDOW_PATH", NULL); - return NULL; } else { strncpy(p, pathName, (size_t) numChars); p[numChars] = '\0'; |