Changeset 952 for trunk


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

fix about box

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/expgui

    r951 r952  
    680680proc About { } {
    681681    global expgui expmap
     682    set version "Revision [lindex $expgui(Revision) 1] (readexp.tcl [lindex $expmap(Revision) 1])"
     683    catch {
     684        set version "[GetSVNVersion $::expgui(gsasdir)]\ntrack: $::expgui(SVNversion)"
     685    }
    682686    tk_dialog .about {About...} \
    683687"EXPGUI\n\
     
    685689APS, Argonne National Laboratory\n\n\
    686690Not subject to copyright\n\n\
    687 Revision [lindex $expgui(Revision) 1] (readexp.tcl [lindex $expmap(Revision) 1])\n\n\
     691$version\n\n\
    688692Cite: B. H. Toby, EXPGUI, a graphical\n\
    689693user interface for GSAS, J. Appl. Cryst.\n\
Note: See TracChangeset for help on using the changeset viewer.