Changeset 976


Ignore:
Timestamp:
Apr 13, 2010 10:41:17 AM (11 years ago)
Author:
toby
Message:

work on Resource stuff

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsascmds.tcl

    r958 r976  
    28112811    if {[file exists /Developer/Tools/Rez]} {
    28122812        set RezApp /Developer/Tools/Rez
    2813     } elseif {[file exists [file join $expgui(gsasdir) Rez]]} {
    2814         set RezApp [file join $expgui(gsasdir) Rez]
     2813    } elseif {[file exists [file join $expgui(gsasexe) Rez]]} {
     2814        set RezApp [file join $expgui(gsasexe) Rez]
    28152815    } else {
    28162816        set RezApp {}
     
    28182818    if {[file exists /Developer/Tools/SetFile]} {
    28192819        set SetFileApp /Developer/Tools/SetFile
    2820     } elseif {[file exists [file join $expgui(gsasdir) SetFile]]} {
    2821         set SetFileApp [file join $expgui(gsasdir) SetFile]
     2820    } elseif {[file exists [file join $expgui(gsasexe) SetFile]]} {
     2821        set SetFileApp [file join $expgui(gsasexe) SetFile]
    28222822    } else {
    28232823        set SetFileApp {}
     
    28422842
    28432843    # assign an icon to the data file, if it and the required tools exist
    2844     set icon [file join $expgui(gsasdir) gsasicon.r]
     2844    set icon [file join $expgui(gsasexe) gsasicon.r]
    28452845    if {[file exists $icon] && $RezApp != "" && $SetFileApp != ""} {
    28462846        exec $RezApp [file nativename $icon] -o $expnative -a
Note: See TracChangeset for help on using the changeset viewer.