Changeset 2421 for trunk/gui/scripts/vtkviewer.tcl

Timestamp:

Aug 26, 2011, 11:57:25 AM (13 years ago)

Author:

ldelgass

Message:

Remove unused zoom-x/zoom-y view params, remove redundant setting of default
orientation and pan in server after a camera reset all.

File:

• trunk/gui/scripts/vtkviewer.tcl (modified) (3 diffs)

trunk/gui/scripts/vtkviewer.tcl

@@ -173 +173 @@
         pan-x           0
         pan-y           0
-        zoom-x          1.0
-        zoom-y          1.0
     }
     set _arcball [blt::arcball create 100 100]
@@ -919 +917 @@
                 pan-x   0
                 pan-y   0
-                zoom-x  1.0
-                zoom-y  1.0
             }
             SendCmd "camera reset all"
@@ -931 +927 @@
             set q [list $_view(qw) $_view(qx) $_view(qy) $_view(qz)]
             $_arcball quaternion $q
-            SendCmd "camera orient $q" 
-            PanCamera
         }
     }