diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-26 08:55:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-10-26 08:55:43 (GMT) |
| commit | 7bd5c1e5436cf2f6f8fd655d891cf7d964c2a3e1 (patch) | |
| tree | 803439a474cf08c8dda07853b63aa0e912677b44 /library/demos | |
| parent | 9be66cd1af6db0fad2e35ff761f35f69f13d77f4 (diff) | |
| download | tk-7bd5c1e5436cf2f6f8fd655d891cf7d964c2a3e1.zip tk-7bd5c1e5436cf2f6f8fd655d891cf7d964c2a3e1.tar.gz tk-7bd5c1e5436cf2f6f8fd655d891cf7d964c2a3e1.tar.bz2 | |
Don't use \\U escape sequence any more in demo: No longer needed starting with Tcl 8.7a4
Diffstat (limited to 'library/demos')
| -rw-r--r-- | library/demos/unicodeout.tcl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/library/demos/unicodeout.tcl b/library/demos/unicodeout.tcl index bb4d8f8..759dc00 100644 --- a/library/demos/unicodeout.tcl +++ b/library/demos/unicodeout.tcl @@ -133,8 +133,7 @@ addSample $w Russian \ "\u0420\u0443\u0441\u0441\u043A\u0438\u0439 \u044F\u0437\u044B\u043A" if {([tk windowingsystem] ne "x11") || (![catch {tk::pkgconfig get fontsystem} fs] && ($fs eq "xft"))} { if {[package vsatisfies [package provide Tcl] 8.7-]} { - addSample $w Emoji \ - "\U1F600\U1F4A9\U1F44D\U1F1F3\U1F1F1" + addSample $w Emoji "😀💩👍🇳🇱" } else { addSample $w Emoji \ "\uD83D\uDE00\uD83D\uDCA9\uD83D\uDC4D\uD83C\uDDF3\uD83C\uDDF1" |