Revision: 51062
          http://brlcad.svn.sourceforge.net/brlcad/?rev=51062&view=rev
Author:   bob1961
Date:     2012-06-12 15:44:34 +0000 (Tue, 12 Jun 2012)
Log Message:
-----------
Removed debug statement. Added a state argument indicating whether or not a 
different button was pressed to the calls to the toggle panel callbacks.

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

Modified: brlcad/trunk/src/tclscripts/lib/Accordian.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/lib/Accordian.tcl       2012-06-12 11:51:54 UTC 
(rev 51061)
+++ brlcad/trunk/src/tclscripts/lib/Accordian.tcl       2012-06-12 15:44:34 UTC 
(rev 51062)
@@ -298,8 +298,6 @@
     delete $_item1
     insert $i $_item2
 
-    .archer0 putString "Accordian::rename: i - $i, mCurrIndex - $saveCI"
-
     if {$i == $saveCI} {
        toggleDisplay $_item2
     }
@@ -406,10 +404,14 @@
            set mCurrIndex $i
 
            grid rowconfigure $itk_interior $mCurrIndex -weight 1
+
+           set state 1
+       } else {
+           set state 0
        }
 
        foreach callback $mTogglePanelCallbacks {
-           catch {$callback $_item}
+           catch {$callback $_item $state}
        }
 
        return
@@ -422,15 +424,17 @@
        grid rowconfigure $itk_interior $i -weight 1
 
        set mCurrIndex $i
+       set state 1
     } else {
        grid forget $itk_component($name\CS)
        grid rowconfigure $itk_interior $i -weight 0
 
        set mCurrIndex -1
+       set state 0
     }
 
     foreach callback $mTogglePanelCallbacks {
-       catch {$callback $_item}
+       catch {$callback $_item $state}
     }
 }
 

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


------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
BRL-CAD Source Commits mailing list
brlcad-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to