Changeset 5368 for trunk/gui/scripts/flowvisviewer.tcl

Timestamp:

Apr 30, 2015 1:04:42 AM (9 years ago)

Author:

ldelgass

Message:

settings fix

File:

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

trunk/gui/scripts/flowvisviewer.tcl

@@ -2514 +2514 @@
     SendCmd "if {\[flow exists $tag\]} {flow delete $tag}"
     array set info  [$flowobj hints]
-    set _settings($this-volume) $info(volume)
-    set _settings($this-outline) $info(outline)
-    set _settings($this-arrows) $info(arrows)
-    set _settings($this-duration) $info(duration)
+    set _settings(-volume) $info(volume)
+    set _settings(-outline) $info(outline)
+    set _settings(-arrows) $info(arrows)
+    set _settings(-duration) $info(duration)
     $itk_component(speed) value $info(speed)
     set cmd {}