Changeset 267 for trunk/expgui


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

# on 2000/08/17 23:48:03, toby did:
implement Replace Phase
error trace on error in a *info command

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/expgui

    • Property rcs:date changed from 2000/08/14 16:28:34 to 2000/08/17 23:48:03
    • Property rcs:lines changed from +6 -7 to +7 -5
    • Property rcs:rev changed from 1.32 to 1.33
    r262 r267  
    6868set expgui(disaglSeparateBox) 1
    6969set expgui(DefaultPeakType) 0
     70# default: keep current atoms when replacing a phase
     71set expgui(DeleteAllAtoms) 0
    7072#=============================================================================
    7173#----------------------------------------------------------------
     
    357359                after idle {DisplayAllAtoms noreset}
    358360            }
    359         } errmsg] {puts "entvartrace error: $errmsg"}   
     361        } errmsg] {error $errmsg}       
    360362    }
    361363}
     
    26772679            -column 1 -row 0 -rowspan 2
    26782680    if [file executable $expgui(exptool)] {
    2679         button $frameLatt.newp -text Replace\nPhase \
    2680                 -command MakeReplacePhaseBox -state disabled
    2681         grid $frameLatt.newp -column 0 -row 0 -rowspan 2 -sticky w
     2681        grid [button $frameLatt.newp -text Replace\nPhase \
     2682                -command MakeReplacePhaseBox] \
     2683                -column 0 -row 0 -rowspan 2 -sticky w
    26822684    }
    26832685    grid columnconfig $frameLatt  1 -weight 1
     
    27242726            -column 0 -row 0 -padx 2 -pady 3 -columnspan 10 -sticky w
    27252727    if [file executable $expgui(exptool)] {
    2726         button $frame3.newa -text "Add New Atom" \
     2728        button $frame3.newa -text "Add New Atoms" \
    27272729                -command {MakeAddAtomsBox $expgui(curPhase)}
    27282730        grid $frame3.newa -column 11 -row 0
Note: See TracChangeset for help on using the changeset viewer.