[PD-cvs] SF.net SVN: pure-data:[10733] branches/pd-devel/0.41.4/src

eighthave at users.sourceforge.net eighthave at users.sourceforge.net
Wed Feb 4 07:04:54 CET 2009


Revision: 10733
          http://pure-data.svn.sourceforge.net/pure-data/?rev=10733&view=rev
Author:   eighthave
Date:     2009-02-04 06:04:54 +0000 (Wed, 04 Feb 2009)

Log Message:
-----------
updated find proc name to the new one from the find_panel package

Modified Paths:
--------------
    branches/pd-devel/0.41.4/src/find_panel.tcl
    branches/pd-devel/0.41.4/src/pd_bindings.tcl

Modified: branches/pd-devel/0.41.4/src/find_panel.tcl
===================================================================
--- branches/pd-devel/0.41.4/src/find_panel.tcl	2009-02-04 06:04:04 UTC (rev 10732)
+++ branches/pd-devel/0.41.4/src/find_panel.tcl	2009-02-04 06:04:54 UTC (rev 10733)
@@ -77,7 +77,8 @@
 		-highlightbackground $::panel_background -command "find_ok $mytoplevel"
 	if {$::windowingsystem eq "x11"} {
 		button .find.close -text [_ "Close"] -default normal -width 9 \
-			-highlightbackground $::panel_background -command "find_cancel $mytoplevel"
+			-highlightbackground $::panel_background -command \
+			"::find_panel::cancel $mytoplevel"
 		pack .find.buttonframe .find.button .find.close -side right -padx 10 -pady 15
 	} else {
 		pack .find.buttonframe .find.button -side right -padx 10 -pady 15

Modified: branches/pd-devel/0.41.4/src/pd_bindings.tcl
===================================================================
--- branches/pd-devel/0.41.4/src/pd_bindings.tcl	2009-02-04 06:04:04 UTC (rev 10732)
+++ branches/pd-devel/0.41.4/src/pd_bindings.tcl	2009-02-04 06:04:54 UTC (rev 10733)
@@ -33,7 +33,7 @@
 
 	# File menu
 	bind $mytoplevel <$modifier-Key-b>        "menu_helpbrowser"
-	bind $mytoplevel <$modifier-Key-f>        "menu_find_panel $mytoplevel"
+	bind $mytoplevel <$modifier-Key-f>        "::find_panel::menu_find_panel $mytoplevel"
 	bind $mytoplevel <$modifier-Key-n>        "menu_new"
 	bind $mytoplevel <$modifier-Key-o>        "menu_open"
 	bind $mytoplevel <$modifier-Key-p>        "menu_print $mytoplevel"


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




More information about the Pd-cvs mailing list