Revision: 54619
          http://brlcad.svn.sourceforge.net/brlcad/?rev=54619&view=rev
Author:   bob1961
Date:     2013-03-12 14:01:04 +0000 (Tue, 12 Mar 2013)
Log Message:
-----------
Added Ged::pane_bind.

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

Modified: brlcad/trunk/src/tclscripts/lib/Ged.tcl
===================================================================
--- brlcad/trunk/src/tclscripts/lib/Ged.tcl     2013-03-12 13:37:31 UTC (rev 
54618)
+++ brlcad/trunk/src/tclscripts/lib/Ged.tcl     2013-03-12 14:01:04 UTC (rev 
54619)
@@ -329,6 +329,7 @@
        method pane_aet {_pane args}
        method pane_arot {_pane args}
        method pane_autoview {_pane args}
+       method pane_bind {_pane _event _script}
        method pane_center {_pane args}
        method pane_constrain_rmode {_pane args}
        method pane_constrain_tmode {_pane args}
@@ -2161,6 +2162,10 @@
     eval $mGed autoview $itk_component($_pane) $args
 }
 
+::itcl::body cadwidgets::Ged::pane_bind {_pane _event _script} {
+    bind $itk_component($_pane) $_event $_script
+}
+
 ::itcl::body cadwidgets::Ged::pane_center {_pane args} {
     eval $mGed center $itk_component($_pane) $args
 }

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


------------------------------------------------------------------------------
Symantec Endpoint Protection 12 positioned as A LEADER in The Forrester  
Wave(TM): Endpoint Security, Q1 2013 and "remains a good choice" in the  
endpoint security space. For insight on selecting the right partner to 
tackle endpoint security challenges, access the full report. 
http://p.sf.net/sfu/symantec-dev2dev
_______________________________________________
BRL-CAD Source Commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/brlcad-commits

Reply via email to