[brlcad-commits] SF.net SVN: brlcad:[34104] brlcad/trunk/src/tclscripts/archer/ArcherCore. tcl

[<br...@us...>]

Revision: 34104
          http://brlcad.svn.sourceforge.net/brlcad/?rev=34104&view=rev
Author:   brlcad
Date:     2009-03-30 04:19:24 +0000 (Mon, 30 Mar 2009)

Log Message:
-----------
try catching the error in case we're using a system iwidgets that doesn't have bob's patch for referencing the unitialized _ret var in panedwindow

Modified Paths:
--------------
    brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl

Modified: brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl	2009-03-29 19:32:27 UTC (rev 34103)
+++ brlcad/trunk/src/tclscripts/archer/ArcherCore.tcl	2009-03-30 04:19:24 UTC (rev 34104)
@@ -1982,7 +1982,9 @@
 	return
     }
 
-    set fractions [$itk_component(hpane) fraction]
+    if {[catch {$itk_component(hpane) fraction} fractions]} {
+	return
+    }
 
     if {[llength $fractions] == 2} {
 	set mHPaneFraction1 [lindex $fractions 0]


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