summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
authorhobbs <hobbs>2000-10-31 00:52:11 (GMT)
committerhobbs <hobbs>2000-10-31 00:52:11 (GMT)
commit032d4fd9828b704021d738faadf62f421c1c0778 (patch)
tree010254ab4340cf22f9bf10f97f5b9ebdf9eee669 /tests
parenta9cde766a59152713ad488a8c0b3a37b1bfe5e3b (diff)
downloadtk-032d4fd9828b704021d738faadf62f421c1c0778.zip
tk-032d4fd9828b704021d738faadf62f421c1c0778.tar.gz
tk-032d4fd9828b704021d738faadf62f421c1c0778.tar.bz2
* tests/tk.test:
* doc/tk.n: updated to reflect default on status of useinputmethods. * library/tk.tcl: tk useinputmethods is set to 1 by default. This enables Kanji and dead-char input by default. Intro'd in 1999-12-16 with default off to avoid some problems with older X servers that would slow down widget creation over time.
Diffstat (limited to 'tests')
-rw-r--r--tests/tk.test5
1 files changed, 2 insertions, 3 deletions
diff --git a/tests/tk.test b/tests/tk.test
index bfd0cf8..a48716a 100644
--- a/tests/tk.test
+++ b/tests/tk.test
@@ -5,7 +5,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: tk.test,v 1.4 1999/12/16 21:58:29 hobbs Exp $
+# RCS: @(#) $Id: tk.test,v 1.5 2000/10/31 00:52:11 hobbs Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
source [file join [pwd] [file dirname [info script]] defs.tcl]
@@ -101,9 +101,8 @@ test tk-4.6 {tk command: useinputmethods: set new} {unixOnly} {
if {[tk useinputmethods 1] == 0} {
puts "this wish doesn't have XIM (X Input Methods) support"
}
- # We should always start with XIM support off
set useim
-} 0
+} $useim
test tk-4.7 {tk command: useinputmethods: set new} {macOrPc} {
# Mac and Windows don't have X Input Methods, so this should
# always return 0