Import build of Tcl/Tk 8.6.10

2020-09-24 23:32:28 +01:00
parent 86027ce3ed
commit c0c00d5551
498 changed files with 65344 additions and 64042 deletions
--- a/amd64/lib/tk8.6/demos/unicodeout.tcl
+++ b/amd64/lib/tk8.6/demos/unicodeout.tcl
@@ -131,6 +131,10 @@ addSample $w Japanese \
 addSample $w Korean "\uB300\uD55C\uBBFC\uAD6D\uC758 \uD55C\uAE00"
 addSample $w Russian \
 	"\u0420\u0443\u0441\u0441\u043A\u0438\u0439 \u044F\u0437\u044B\u043A"
+if {[tk windowingsystem] ne "x11"} {
+    addSample $w Emoji \
+	    "\uD83D\uDE00\uD83D\uDCA9\uD83D\uDC4D\uD83C\uDDF3\uD83C\uDDF1"
+}

 ## We're done processing, so change things back to normal running...
 destroy $w.wait