Changeset 3800 for branches/1.3/gui/scripts/moleculeViewer.tcl

Timestamp:

Jul 15, 2013, 9:29:39 AM (11 years ago)

Author:

gah

Message:

add -simulation to plotadd calls

File:

• branches/1.3/gui/scripts/moleculeViewer.tcl (modified) (1 diff)

branches/1.3/gui/scripts/moleculeViewer.tcl

@@ -235 +235 @@
         -param ""
     }
-    foreach {opt val} $settings {
-        if {![info exists params($opt)]} {
-            error "bad settings \"$opt\": should be [join [lsort [array names params]] {, }]"
-        }
-        set params($opt) $val
-    }
+    array set params $settings
  
     set pos [lsearch -exact $dataobj $_dlist]