[brlcad-commits] SF.net SVN: brlcad:[43938] brlcad/trunk/src/tclscripts/lib/Ged.tcl

[<bo...@us...>]

Revision: 43938
          http://brlcad.svn.sourceforge.net/brlcad/?rev=43938&view=rev
Author:   bob1961
Date:     2011-03-23 21:13:50 +0000 (Wed, 23 Mar 2011)

Log Message:
-----------
Minor mod to Ged::handle_data_move to not load data for _pane.

Modified Paths:
--------------
    brlcad/trunk/src/tclscripts/lib/Ged.tcl

Modified: brlcad/trunk/src/tclscripts/lib/Ged.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/lib/Ged.tcl	2011-03-23 19:44:23 UTC (rev 43937)
+++ brlcad/trunk/src/tclscripts/lib/Ged.tcl	2011-03-23 21:13:50 UTC (rev 43938)
@@ -3053,12 +3053,20 @@
 	set labels [$mGed $_dtype $itk_component($_pane) labels]
 
 	foreach dm {ur ul ll lr} {
+	    if {$dm == $_pane} {
+		continue
+	    }
+
 	    $mGed $_dtype $itk_component($dm) labels $labels
 	}
     } else {
 	set points [$mGed $_dtype $itk_component($_pane) points]
 
 	foreach dm {ur ul ll lr} {
+	    if {$dm == $_pane} {
+		continue
+	    }
+
 	    $mGed $_dtype $itk_component($dm) points $points
 	}
     }


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.