[PD-cvs] pd/src desire.tk,1.1.2.600.2.250,1.1.2.600.2.251

[chunlee]

Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20843

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
click_runmode fix for AtomBox


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.250
retrieving revision 1.1.2.600.2.251
diff -C2 -d -r1.1.2.600.2.250 -r1.1.2.600.2.251
*** desire.tk	30 Jul 2007 03:35:17 -0000	1.1.2.600.2.250
--- desire.tk	30 Jul 2007 04:35:07 -0000	1.1.2.600.2.251
***************
*** 3984,3987 ****
--- 3984,3988 ----
  
  def Canvas click_runmode {id x y f target} {
+ 	if {$@focus != ""} {if {[[$@focus class] <= TextBox]} {$@focus unedit}}
  	if {[llength $id]} {
  		if {[$id class] != "Canvas"} {