diff options
author | Joe Mistachkin <joe@mistachkin.com> | 2018-10-19 03:30:24 (GMT) |
---|---|---|
committer | Joe Mistachkin <joe@mistachkin.com> | 2018-10-19 03:30:24 (GMT) |
commit | 69ab57308dd6a687eaecca6794379b70afa7b6c6 (patch) | |
tree | b3aa36c3bf4bf6c8a1c1988fde82a2839cc093a2 /generic | |
parent | f0e0adc0322734e17b059f3ca33f5cea96b1256f (diff) | |
download | tk-69ab57308dd6a687eaecca6794379b70afa7b6c6.zip tk-69ab57308dd6a687eaecca6794379b70afa7b6c6.tar.gz tk-69ab57308dd6a687eaecca6794379b70afa7b6c6.tar.bz2 |
Proposed fix for ticket [766ef52f31].
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tkOption.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/generic/tkOption.c b/generic/tkOption.c index 24e7fb3..545a9b9 100644 --- a/generic/tkOption.c +++ b/generic/tkOption.c @@ -996,6 +996,9 @@ AddFromString( while ((*src == ' ') || (*src == '\t')) { src++; } + if (*src == '\\' && (src[1] == '\t' || src[1] == ' ')) { + src++; + } if (*src == '\0') { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "missing value on line %d", lineNum)); @@ -1025,7 +1028,7 @@ AddFromString( src += 2; *dst++ = '\n'; continue; - } else if (src[1] == '\t' || src[1] == ' ' || src[1] == '\\') { + } else if (src[1] == '\\') { ++src; } else if (src[1] >= '0' && src[1] <= '3' && src[2] >= '0' && src[2] <= '9' && src[3] >= '0' && src[3] <= '9') { |