Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29447
Modified Files: Tag: desiredata desire.tk Log Message: to kill a dead method
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.600.2.287 retrieving revision 1.1.2.600.2.288 diff -C2 -d -r1.1.2.600.2.287 -r1.1.2.600.2.288 *** desire.tk 5 Aug 2007 06:03:41 -0000 1.1.2.600.2.287 --- desire.tk 6 Aug 2007 01:04:31 -0000 1.1.2.600.2.288 *************** *** 1869,1891 **** def Canvas delete {} { $self delete_window - #if {$@subpatch || $@gop} { - # $self delete_children - #} else { super - #} - } - - def Canvas delete_children {} { - foreach child [$self children] { - if {[$child class] == "Canvas"} { - $child delete - } else { - $self del [$self index $child] - } - } - foreach wire $@wires { - $self disconnect [$wire connects] - $wire delete - } }
--- 1869,1873 ----