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

[svn_grass at osgeo.org]

Author: marisn
Date: 2008-10-26 09:04:51 -0400 (Sun, 26 Oct 2008)
New Revision: 34008

Modified:
   grass/branches/develbranch_6/visualization/nviz/scripts/flythrough.tcl
Log:
Prevent UI from failing when switching back from fly mode

Modified: grass/branches/develbranch_6/visualization/nviz/scripts/flythrough.tcl
===================================================================
--- grass/branches/develbranch_6/visualization/nviz/scripts/flythrough.tcl	2008-10-26 12:53:22 UTC (rev 34007)
+++ grass/branches/develbranch_6/visualization/nviz/scripts/flythrough.tcl	2008-10-26 13:04:51 UTC (rev 34008)
@@ -110,6 +110,7 @@
 proc fly_change_mode {flag} {
     global XY Nv_ fly
 
+	set Nv_(FlyThrough) 1
 	inform "Interactively set view position"
 	pack forget $XY $Nv_(HEIGHT_SLIDER) $Nv_(TWIST_SLIDER)
 	Nset_fly_mode $flag