[PD-cvs] pd/src desire.tk,1.1.2.600.2.388,1.1.2.600.2.389

[chunlee]

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

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
small fix to subpatcherize


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.388
retrieving revision 1.1.2.600.2.389
diff -C2 -d -r1.1.2.600.2.388 -r1.1.2.600.2.389
*** desire.tk	17 Aug 2007 07:32:04 -0000	1.1.2.600.2.388
--- desire.tk	17 Aug 2007 08:23:03 -0000	1.1.2.600.2.389
***************
*** 4003,4007 ****
  
  def Canvas subpatcherize_mkio {center iolist offset} {
- 	puts "iolist>>>> $iolist"
  	mset {x y} $center; set inx 0; set outx 0
  	for {set i 0} {$i < [llength $iolist]} {incr i} {
--- 4003,4006 ----
***************
*** 4036,4040 ****
  	set center [$self selection_center]
  	set rewire_off [llength [$@objectsel values]]
! 	set ins {}; set outs {}; set toins {}; set fromouts {}
  	foreach obj [$@objectsel values] {
  		for {set i 0} {$i < [$obj ninlets]} {incr i} {
--- 4035,4039 ----
  	set center [$self selection_center]
  	set rewire_off [llength [$@objectsel values]]
! 	set ins {}; set outs {}; set toins {}; set fromouts {}; set broken {}; set iolist {}
  	foreach obj [$@objectsel values] {
  		for {set i 0} {$i < [$obj ninlets]} {incr i} {