Changeset 3799 for trunk/gui/scripts/meshresult.tcl

Timestamp:

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

Author:

gah

Message:

add -simulation to plotadd calls

File:

• trunk/gui/scripts/meshresult.tcl (modified) (1 diff)

trunk/gui/scripts/meshresult.tcl

@@ -136 +136 @@
         -param ""
     }
-    foreach {opt val} $settings {
-        if {![info exists params($opt)]} {
-            error "bad setting \"$opt\": should be [join [lsort [array names params]] {, }]"
-        }
-        set params($opt) $val
-    }
+    array set params $settings
     if {$params(-color) == "auto" || $params(-color) == "autoreset"} {
         # can't handle -autocolors yet