summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-07-29 09:29:16 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-07-29 09:29:16 (GMT)
commit35f064fd91f1a987c493f4740df59d3a0f162a42 (patch)
tree5e08d97a2f01feab55697b7b4d4a050eb31e8452
parentc86bd1b78ad2eec0899db1c0927048cf9f0ed435 (diff)
downloadtcl-35f064fd91f1a987c493f4740df59d3a0f162a42.zip
tcl-35f064fd91f1a987c493f4740df59d3a0f162a42.tar.gz
tcl-35f064fd91f1a987c493f4740df59d3a0f162a42.tar.bz2
Make sure that "string is space \u202f" will continue to return "1", even if in future Unicode this character (NARROW_NO_BREAK_SPACE) will cease to be a space. See: [http://www.unicode.org/review/pri249/]
-rw-r--r--generic/tclUtf.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclUtf.c b/generic/tclUtf.c
index a038f8a..e5497a4 100644
--- a/generic/tclUtf.c
+++ b/generic/tclUtf.c
@@ -1555,7 +1555,7 @@ Tcl_UniCharIsSpace(
if (((Tcl_UniChar) ch) < ((Tcl_UniChar) 0x80)) {
return TclIsSpaceProc((char) ch);
- } else if ((Tcl_UniChar) ch == 0x180e) {
+ } else if ((Tcl_UniChar) ch == 0x180e || (Tcl_UniChar) ch == 0x202f) {
return 1;
} else {
return ((SPACE_BITS >> GetCategory(ch)) & 1);