Changeset 1131 for branches/sandbox/expgui

Timestamp:

Apr 14, 2011 2:54:42 PM (10 years ago)

Author:

lake

Message:

Rigid.tcl, expgui, addcmds.tcl and rbimport_cartesian.tcl updates. Simple sort routine added to Edit Matrix.

File:

• branches/sandbox/expgui (modified) (2 diffs)

branches/sandbox/expgui

@@ -1 @@
-#!/bin/sh 
+#!/bin/sh
 # the next line restarts this script using wish found in the path\
 exec wish "$0" "$@"
@@ -1048 +1048 @@
 
     # don't reload the last displayed phase
-    if {$expgui(curPhase) == $crsPhase} return
+    if {$expgui(curPhase) == $crsPhase} {
+       DisplayAllAtoms $crsPhase
+       return
+    }
 
     ##########################################################