Changeset 1108 for branches/sandbox/expgui
- Timestamp:
- Jan 18, 2011 3:43:29 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/sandbox/expgui
r1104 r1108 996 996 997 997 set crsPhase {} 998 $expgui(atomxform) config -text " XformAtoms" -state disabled998 $expgui(atomxform) config -text "Modify Atoms" -state disabled 999 999 foreach n $expmap(phaselist) type $expmap(phasetype) { 1000 1000 if {$n == $num} { … … 1382 1382 DisplayRefFlags $atomnum $p 1383 1383 $expgui(EditingAtoms) config -text "Editing atom #$atomnum -- [atominfo $p $atomnum label]" 1384 $expgui(atomxform) config -text " XformAtom" -state normal1384 $expgui(atomxform) config -text "Modify Atom" -state normal 1385 1385 } 1386 1386 … … 1407 1407 # this needs to track by phase 1408 1408 DisplayRefFlags $numberList $p 1409 $expgui(atomxform) config -text " XformAtoms" -state normal1409 $expgui(atomxform) config -text "Modify Atoms" -state normal 1410 1410 } 1411 1411
Note: See TracChangeset
for help on using the changeset viewer.