Eskil

Diff
Login
Annotate Patch Side-by-side Diff

Differences From Artifact [3ad52a2b26]:

To Artifact [bc93116d5f]:

1
2
3
4
5

6
7
8
9
10
11
12

1
2
3
4

5
6
7
8
9
10
11
12





-
+








#------------------------------------------------------------*- tcl -*-
# Tests for GUI
#----------------------------------------------------------------------

lappend ::auto_path /home/peter/src/TkTest
lappend ::auto_path /home/$::env(USER)/src/TkTest
package require TkTest
wm withdraw .

proc XauthSecure {} {
    global tcl_platform

    if {[string compare unix $tcl_platform(platform)]} {
︙