Changeset 956


Ignore:
Timestamp:
Mar 11, 2010 2:31:26 PM (11 years ago)
Author:
toby
Message:

fixes for self update

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsascmds.tcl

    r955 r956  
    32623262    #set wish "[info nameofexecutable]"
    32633263    # check for updates
    3264     if [catch {set res [exec $SVN status $::expgui(scriptdir) -u]} err] {
     3264    if [catch {set res [exec $SVN status $::expgui(gsasdir) -u]} err] {
    32653265        MyMessageBox -parent . -title "Error checking status" \
    32663266            -message "Error checking for updates: $err" \
     
    32943294        puts $fp "@echo Preparing to start upgrade of EXPGUI."
    32953295        puts $fp "@pause"
    3296         puts $fp "$SVN cleanup $::expgui(scriptdir)"
    3297         puts $fp "$SVN up $::expgui(scriptdir)"
     3296        puts $fp "$SVN cleanup $::expgui(gsasdir)"
     3297        puts $fp "$SVN up $::expgui(gsasdir)"
    32983298        puts $fp "@echo *"
    32993299        puts $fp "@echo ******************************************************************"
     
    33113311
    33123312    # do a quiet cleanup. Sometimes needed after install, and never hurts
    3313     if [catch {set res [exec $SVN cleanup $::expgui(scriptdir)]} err] {
     3313    if [catch {set res [exec $SVN cleanup $::expgui(gsasdir)]} err] {
    33143314        MyMessageBox -parent . -title "Error in cleanup" \
    33153315            -message "Error performing cleanup. Will try to continue anyway. Error:\n$err" \
    33163316            -icon error
    33173317    }
    3318     if [catch {set res [exec $SVN up $::expgui(scriptdir)]} err] {
     3318    if [catch {set res [exec $SVN up $::expgui(gsasdir)]} err] {
    33193319        MyMessageBox -parent . -title "Error updating" \
    33203320            -message "Error performing update:\n$err" \
Note: See TracChangeset for help on using the changeset viewer.