[PD-cvs] pd/src desire.tk,1.1.2.557,1.1.2.558

chunlee chunlee at users.sourceforge.net
Fri Nov 17 13:00:03 CET 2006


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

Modified Files:
      Tag: devel_0_39
	desire.tk 
Log Message:
object move fixed


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.557
retrieving revision 1.1.2.558
diff -C2 -d -r1.1.2.557 -r1.1.2.558
*** desire.tk	17 Nov 2006 07:20:58 -0000	1.1.2.557
--- desire.tk	17 Nov 2006 11:59:59 -0000	1.1.2.558
***************
*** 3955,3959 ****
  def Box moveto {x1 y1} {
  	if {[info exists @isnew]} {
! 
  	} else {
  		pd .$@canvas object_moveto !$self $x1 $y1
--- 3955,3959 ----
  def Box moveto {x1 y1} {
  	if {[info exists @isnew]} {
! 		if {!$@isnew} { pd .$@canvas object_moveto !$self $x1 $y1}
  	} else {
  		pd .$@canvas object_moveto !$self $x1 $y1
***************
*** 6597,6601 ****
  	set col [format #%6.6x $color]
  	$frame.color configure -background $col -foreground [complement $col] -text $col
! 	$self do_auto_apply
  }
  
--- 6597,6602 ----
  	set col [format #%6.6x $color]
  	$frame.color configure -background $col -foreground [complement $col] -text $col
! 	if {$self != "ddrc"} {$self do_auto_apply}
! 	#$self do_auto_apply
  }
  





More information about the Pd-cvs mailing list