Changeset 953 for trunk/expgui


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

remove NIST refs; review space in dir warn; use PGPLOT_DIR on win-NT, etc.; doc updates; tkcon problems on windows, add open console; move update menu from help

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/expgui

    r952 r953  
    8080
    8181# location for web pages, if not found locally
    82 set expgui(website) www.ncnr.nist.gov/xtal/software/expgui
     82set expgui(website) 11bm.xor.aps.anl.gov/expguidoc/
    8383# default for archive mode = on
    8484set expgui(archive) 1
     
    695695\n\n\
    696696Generalized Structure Analysis System\n(GSAS)\n\
    697 A. C. Larson and\n R. B. Von Dreele,\n LANSCE, Los Alamos\n\n\
     697R. B. Von Dreele,\n
     698APS, Argonne National Laboratory\n
     699and A. C. Larson, Los Alamos (retired)\n\n\
    698700" \
    699701        info 0 OK
     
    41654167$expgui(fm).help.menu add command -command "MakeWWWHelp menu" \
    41664168        -label "Help on menu"
    4167 if {![catch {package require tkcon} errmsg]} {
    4168     $expgui(fm).help.menu add command -label "Open console" \
    4169         -command {tkcon show}
    4170 } elseif {$tcl_platform(platform) == "windows"} {
     4169if {$tcl_platform(platform) == "windows"} {
    41714170    $expgui(fm).help.menu add command -label "Open console" \
    41724171        -command {console show}
    41734172}
     4173if {![catch {package require tkcon} errmsg]} {
     4174    $expgui(fm).help.menu add command -label "Open tkcon console" \
     4175        -command {tkcon show}
     4176}
    41744177# add update commands to buffer
    41754178if [CheckUpdateImplemented $expgui(gsasdir)] {
    4176     $expgui(fm).help.menu add command -command CheckAndDoUpdate -label "Update GSAS/EXPGUI"
    4177 #    $expgui(fm).help.menu add cascade -menu $expgui(fm).help.menu.track \
     4179    $expgui(fm).file.menu add command -command CheckAndDoUpdate -label "Update GSAS/EXPGUI"
     4180#    $expgui(fm).file.menu add cascade -menu $expgui(fm).file.menu.track \
    41784181#       -label "Select EXPGUI version"
    4179 #    menu $expgui(fm).help.menu.track
    4180 #    $expgui(fm).help.menu.track add radiobutton -command {SetSVNbranch trunk} -label Development -value trunk \
     4182#    menu $expgui(fm).file.menu.track
     4183#    $expgui(fm).file.menu.track add radiobutton -command {SetSVNbranch trunk} -label Development -value trunk \
    41814184#       -variable expgui(SVNversion)
    4182 #    $expgui(fm).help.menu.track add radiobutton -command {SetSVNbranch stable} -label Standard -value stable \
     4185#    $expgui(fm).file.menu.track add radiobutton -command {SetSVNbranch stable} -label Standard -value stable \
    41834186#       -variable expgui(SVNversion)
    41844187    # get info about the current CMPR version on the server. Someday we might want to compare this
     
    41954198    }
    41964199} else {
    4197     $expgui(fm).help.menu add command -label "Show update problem" -command {
     4200    $expgui(fm).file.menu add command -label "Show update problem" -command {
    41984201        if {! [file exists [file join $expgui(gsasdir) .svn]]} {
    41994202            MyMessageBox -parent . -title "No .svn" \
Note: See TracChangeset for help on using the changeset viewer.