Changeset 1141 for branches/sandbox/distrest.tcl

Timestamp:

Apr 28, 2011 2:43:25 PM (10 years ago)

Author:

lake

Message:

macros added to soft restraints and fix coordinate routines

File:

• branches/sandbox/distrest.tcl (modified) (2 diffs)

branches/sandbox/distrest.tcl

@@ -83 +83 @@
     set ::entrycmd(trace) 0
     set ::entryvar(distrestweight) [SoftConst weight]
+    RecordMacroEntry "set ::entryvar(distrestweight) [SoftConst weight]" 0
     set ::entrycmd(trace) 1
-
+    incr ::expgui(changed)
 
     #Run Disagl Commands *****************************************************
@@ -540 +541 @@
         #puts "SoftConst restraintlist set $sr_write"
         SoftConst restraintlist set $sr_write
+        RecordMacroEntry "SoftConst restraintlist set $sr_write" 0
         #set ::sr_bond_list $new_list
         # indicate a change to the .EXP file