Changeset 1141
- Timestamp:
- Apr 28, 2011 2:43:25 PM (10 years ago)
- Location:
- branches/sandbox
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/sandbox/addcmds.tcl
r1131 r1141 740 740 set inp [ 741 741 tk_getOpenFile -parent $np -initialfile $newhist(instfile) -filetypes { 742 {"Inst files" .INS*} {"Inst files" .ins*} 742 {"Inst files" .INS*} {"Inst files" .ins*} 743 743 {"Inst files" .PRM} {"Inst files" .prm} 744 744 {"All files" *} … … 1637 1637 grid $top.scroll -sticky ns -column 4 -row 2 1638 1638 } else { 1639 grid forget $top.scroll 1639 grid forget $top.scroll 1640 1640 } 1641 1641 update … … 2058 2058 foreach i $phaselist { 2059 2059 catch {atom_constraint_write $i $fix_list($i)} 2060 catch {RecordMacroEntry "catch {atom_constraint_write $i $fix_list($i)}" 0} 2060 2061 #puts $fix_list($i) 2061 2062 } -
branches/sandbox/distrest.tcl
r1109 r1141 83 83 set ::entrycmd(trace) 0 84 84 set ::entryvar(distrestweight) [SoftConst weight] 85 RecordMacroEntry "set ::entryvar(distrestweight) [SoftConst weight]" 0 85 86 set ::entrycmd(trace) 1 86 87 incr ::expgui(changed) 87 88 88 89 #Run Disagl Commands ***************************************************** … … 540 541 #puts "SoftConst restraintlist set $sr_write" 541 542 SoftConst restraintlist set $sr_write 543 RecordMacroEntry "SoftConst restraintlist set $sr_write" 0 542 544 #set ::sr_bond_list $new_list 543 545 # indicate a change to the .EXP file
Note: See TracChangeset
for help on using the changeset viewer.