Changeset 5985 for branches/1.4


Ignore:
Timestamp:
Feb 9, 2016, 11:57:35 AM (9 years ago)
Author:
gah
Message:

add -appname switch for testing

Location:
branches/1.4/gui
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • branches/1.4/gui/apps/launcher.tcl

    r5984 r5985  
    187187            -appname {
    188188                global rapptureInfo
    189                 set rapptureInfo(appName) $opt [lindex $argv 0]
     189                set rapptureInfo(appName) [lindex $argv 0]
    190190                set argv [lrange $argv 1 end]
    191191            }

  • branches/1.4/gui/scripts/analyzer.tcl

    r5984 r5985  
    17981798        puts $f [list "Application" $_saved(Application)]
    17991799        set runfiles ""
    1800         set root [file root $fileName]
    18011800        foreach file $_saved(Files) {
    18021801            set tail [file tail $file]
    1803             set dest [file join $root $file]
     1802            set dest [file join $root $tail]
    18041803            file copy -force $file $dest
    18051804            lappend runfiles $tail
Note: See TracChangeset for help on using the changeset viewer.