Changeset 858 for trunk/gui/scripts/unirect2d.tcl

Timestamp:

Jan 25, 2008 10:25:14 AM (16 years ago)

Author:

gah

Message:

 

File:

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

trunk/gui/scripts/unirect2d.tcl

@@ -136 +136 @@
         }
         v - xlin - vlog - z - zlin - zlog {
-            set min [blt::vector expr min($_zv)]
-            set max [blt::vector expr max($_zv)]
+            if { [$_zv length] > 0 } {
+               set min [blt::vector expr min($_zv)]
+               set max [blt::vector expr max($_zv)]
+            } else {
+                set min 0.0
+                set max 1.0
+            }
             set axis "zaxis"
         }