Check-in [02dabb0f9f]

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Start testing.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:02dabb0f9f47f8a43caed0f7d816da5ded9e8618
User & Date: stu 2014-10-21 05:35:45
Context
2014-10-22
06:24
Improve examples. check-in: f841a312f7 user: stu tags: trunk
2014-10-21
05:35
Start testing. check-in: 02dabb0f9f user: stu tags: trunk
02:26
Update to latest TEA. check-in: 17236d9dfe user: stu tags: trunk
Changes

Added tests/tkxext.test.













































































































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
#
# tkxext.test
#
# Test TkXext
#

#
package require Tcl 8.5
package require tcltest 2
#

#
package require TkXext
#

#
namespace eval ::tkxext::test {

namespace import ::tcltest::test


test tkxext-1.1 {TkXext commands} -body {
	lsort [info commands ::TkXext*]
} -result [list {*}{
	::TkXext.delete.or.kill
	::TkXext.find.window
	::TkXext.focus
	::TkXext.get.resize.increments
	::TkXext.make.window.exist
	::TkXext.map.window
	::TkXext.move.pointer
	::TkXext.move.window
	::TkXext.reparent.window
	::TkXext.resize.window
	::TkXext.send.button.press
	::TkXext.send.button.release
	::TkXext.send.key.press
	::TkXext.send.key.release
	::TkXext.send.string
	::TkXext.unmap.window
}]


}; # End of namespace eval ::tkxext::test
#

# cleanup
namespace delete ::tkxext::test
::tcltest::cleanupTests
flush stdout
return


# EOF