Eskil

Differences From Artifact [8514a630ef]:

• File tests/gui.test — part of check-in [40e553d4d7] at 2012-02-19 21:58:48 on branch trunk — Cleanup to get tests to run. (user: peter size: 3049)

To Artifact [3ad52a2b26]:

• File tests/gui.test — part of check-in [1125c540c5] at 2016-07-29 10:38:41 on branch trunk — Tidying tests (user: peter size: 2964) [more...]

1
2
3
4
5
6
7
8
9
10
11

1
2


3
4
5
6
7
8
9

-
-

#------------------------------------------------------------*- tcl -*-
# Tests for GUI
#----------------------------------------------------------------------
# $Revision$
#----------------------------------------------------------------------

lappend ::auto_path /home/peter/src/TkTest
package require TkTest
wm withdraw .

proc XauthSecure {} {