Changeset 884


Ignore:
Timestamp:
Dec 4, 2009 5:13:42 PM (11 years ago)
Author:
toby
Message:

# on 2007/01/17 04:21:56, toby did:
warn on windows comspec problem
fix convergence spelling

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/expgui

    • Property rcs:date changed from 2006/04/30 23:15:41 to 2007/01/17 04:21:56
    • Property rcs:lines changed from +2 -2 to +17 -4
    • Property rcs:rev changed from 1.80 to 1.81
    r882 r884  
    200200                -helplink "expgui_Win_readme.html NetPath"
    201201    }
    202     #
     202    # test for error in COMSPEC environment variable setting
     203    if {[catch {set env(COMSPEC)}]} {
     204        set env(COMSPEC) {c:\windows\system32\cmd.exe}
     205    }
     206    if {[auto_execok $env(COMSPEC)] == ""} {
     207        set env(COMSPEC) {c:\windows\system32\cmd.exe}
     208    }
     209    if {[auto_execok $env(COMSPEC)] == ""} {
     210        MyMessageBox -parent . -title "cmd.exe not found " \
     211            -message "The Windows COMSPEC environment variable is not set correctly. It should point to a copy of cmd.exe (or command.com on -95/-98/-ME). EXPGUI also did not find the file in the most common location (c:\\windows\\system32\\cmd.exe). Please fix: EXPGUI cannot run GSAS programs without this." \
     212            -icon "error" -type Sorry -default sorry
     213#           -helplink "expguierr.html Customizewarning"
     214        return
     215    }
    203216    set expgui(exptool) [file join $expgui(gsasexe) exptool.exe]
    204217} else {
     
    39203933grid [frame $expgui(lsFrame).f1.cv -bd 4 -relief groove] \
    39213934        -row $row -column 2 -sticky ew
    3922 grid [label $expgui(lsFrame).f1.cv.l -text "Convgerence Criterion"] \
     3935grid [label $expgui(lsFrame).f1.cv.l -text "Convergence Criterion"] \
    39233936        -row 0 -column 0 -columnspan 2
    39243937grid [label $expgui(lsFrame).f1.cv.v -textvariable expgui(convlbl)] -row 1 -column 0
Note: See TracChangeset for help on using the changeset viewer.