Eskil

Check-in [bc38ecca6e]
Login

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

Overview
Comment:Handle different user name.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: bc38ecca6e14887439847f5e371ba4830cd1aba3bd3f1518875d2b6cb3fc1a5f
User & Date: peter 2018-10-20 20:28:34
Context
2018-10-20
20:29
Handle NodeStatus in a variable, for speed. check-in: c6bb079eec user: peter tags: trunk
20:28
Handle different user name. check-in: bc38ecca6e user: peter tags: trunk
2018-10-03
20:28
Do not try to use a kit in vcsvfs. check-in: 3be6954df9 user: peter tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to tests/gui.test.

1
2
3
4
5
6
7
8
9
10
11
12
#------------------------------------------------------------*- tcl -*-
# Tests for GUI
#----------------------------------------------------------------------

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

proc XauthSecure {} {
    global tcl_platform

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




|







1
2
3
4
5
6
7
8
9
10
11
12
#------------------------------------------------------------*- tcl -*-
# Tests for GUI
#----------------------------------------------------------------------

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)]} {