[GRASS-SVN] r61958 - grass/branches/develbranch_6/visualization/nviz/scripts

[svn_grass at osgeo.org]

Author: hamish
Date: 2014-09-14 20:34:14 -0700 (Sun, 14 Sep 2014)
New Revision: 61958

Modified:
   grass/branches/develbranch_6/visualization/nviz/scripts/panel_cutplane.tcl
Log:
bugfix: allow entering cutting plane x,y position using the keyboard

Modified: grass/branches/develbranch_6/visualization/nviz/scripts/panel_cutplane.tcl
===================================================================
--- grass/branches/develbranch_6/visualization/nviz/scripts/panel_cutplane.tcl	2014-09-14 19:37:08 UTC (rev 61957)
+++ grass/branches/develbranch_6/visualization/nviz/scripts/panel_cutplane.tcl	2014-09-15 03:34:14 UTC (rev 61958)
@@ -388,7 +388,7 @@
 	cutplaneUpdateRotation2 $BASE
 	cutplaneUpdateTilt2 $BASE
 	
-	Nv_itemDrag $BASE.pos $Nv_(CPLANE_POS) 63 63
+	Nv_itemDrag $BASE.left.pos $Nv_(CPLANE_POS) 63 63
     }
 }
 
@@ -479,7 +479,7 @@
 		if { [Nget_xyrange] > 0} {
 		set dis_x [expr int( ($new_x/([Nget_xyrange]/2))*63)+63]
 		set dis_y [expr int( ($new_y/([Nget_xyrange]/2))*63)+63]
-		Nv_itemDrag $BASE.pos $Nv_(CPLANE_POS) $dis_x $dis_y
+		Nv_itemDrag $BASE.left.pos $Nv_(CPLANE_POS) $dis_x $dis_y
 		}
 
 		# Finally set the translation
@@ -507,19 +507,3 @@
 	}
 }
 
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-