#2206 focus-5.1 test suite case fails ni 8.5a6

[Larry W. Virden]

Tk cvs head, as retrieved from Activestate's cvs ftp site
Sun C compiler, compiled on SPARC Solaris 9 with options \"'--prefix=/projects/sprs_lwv/tcl85' '--enable-shared' '--enable-symbols' '--enable-stubs' '--enable-64bit' 'CC=cc'\"

Tk test suite run on SPARC Solaris 9, displaying to two platforms: Sun's solaris 9 x server and exceed running on windows xp

Yes, I ran the test suite twice, comparing the two servers, because of the errors I was seeing in the test suite.

In both cases, I'm seeing the same error:

focus.test

==== focus-5.1 ChangeXFocus procedure, don't take focus unless have it FAILED
==== Contents of test case:

focusSetup
focus -force .t
update
set result [focus]
send [dobg {tk appname}] {focus -force .; update}
lappend result [focus]
focus .t.b2
update
lappend result [focus]
---- Result was:
.t .t {}
---- Result should have been (exact matching):
.t {} {}
==== focus-5.1 FAILED

[Larry W. Virden]

Logged In: YES
user_id=15949
Originator: YES

This error continues to be exhibited, with the beta versions of tcl and tk.