Changeset 950 for trunk


Ignore:
Timestamp:
Mar 10, 2010 3:09:20 PM (11 years ago)
Author:
toby
Message:

fix 1st bugs

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/expgui

    r949 r950  
    41694169}
    41704170# add update commands to buffer
    4171 if [CheckUpdateImplemented $scriptdir] {
     4171if [CheckUpdateImplemented $expgui(gsasdir)] {
    41724172    $expgui(fm).help.menu add command -command CheckAndDoUpdate -label "Update GSAS/CMPR"
    41734173#    $expgui(fm).help.menu add cascade -menu $expgui(fm).help.menu.track \
     
    41804180    # get info about the current CMPR version on the server. Someday we might want to compare this
    41814181    # say every month and notify when there is a new version to update
    4182     set repos [GetSVNrepository $scriptdir]
     4182    set repos [GetSVNrepository $expgui(gsasdir)]
    41834183    # send a "p" to accept the server fingerprint in case needed on 1st access
    41844184    catch {set out [exec echo "p" | svn info $repos]} err
     
    41874187    if {$::tcl_platform(platform) == "windows" && $::tcl_platform(os) != "Windows 95"} {
    41884188        catch {
    4189             file delete [file normalize ~/cmpr_update.bat]
     4189            file delete [file normalize ~/expgui_update.bat]
    41904190        }
    41914191    }
    41924192} else {
    41934193    $expgui(fm).help.menu add command -label "Show update problem" -command {
    4194         if {! [file exists [file join $scriptdir .svn]]} {
     4194        if {! [file exists [file join $expgui(gsasdir) .svn]]} {
    41954195            MyMessageBox -parent . -title "No .svn" \
    41964196                -message "Unable to update because the gsas/.svn directory is not present." \
Note: See TracChangeset for help on using the changeset viewer.