[PD-cvs] pd/src desire.tk,1.1.2.600.2.345,1.1.2.600.2.346

[chunlee]

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

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
deselect when switch to run mode


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.345
retrieving revision 1.1.2.600.2.346
diff -C2 -d -r1.1.2.600.2.345 -r1.1.2.600.2.346
*** desire.tk	11 Aug 2007 22:13:17 -0000	1.1.2.600.2.345
--- desire.tk	11 Aug 2007 22:15:21 -0000	1.1.2.600.2.346
***************
*** 1630,1635 ****
  def Canvas editmode {} {return $@editmode}
  def Canvas editmode= {mode} {
!     #maybe it not necessary to deselect..
!     #if {!$mode} {$self deselect_all}
      set @editmode $mode; $self changed editmode
  #    catch {.$self.bbar.edit configure -image icon_mode_$mode}
--- 1630,1634 ----
  def Canvas editmode {} {return $@editmode}
  def Canvas editmode= {mode} {
!     if {!$mode} {$self deselect_all}
      set @editmode $mode; $self changed editmode
  #    catch {.$self.bbar.edit configure -image icon_mode_$mode}