Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv2906
Modified Files: Tag: devel_0_39 desire.tk Log Message: select rect wire delete worx
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.9 retrieving revision 1.1.2.10 diff -C2 -d -r1.1.2.9 -r1.1.2.10 *** desire.tk 21 Aug 2005 17:42:21 -0000 1.1.2.9 --- desire.tk 21 Aug 2005 18:57:08 -0000 1.1.2.10 *************** *** 1996,2002 **** if {[llength $_($self:selection)] > 0} {object_delete $canvas} if {[llength $_($self:selection_wire)] > 0} { ! $canvas delete $_($self:selection_wire) set _($self:selection_wire) {} --- 1996,2010 ---- if {[llength $_($self:selection)] > 0} {object_delete $canvas} + if {[llength $_($self:selection_wire)] > 0} { ! #$canvas delete $_($self:selection_wire) ! ! foreach wire $_($self:selection_wire) { ! ! $canvas delete $wire ! ! } ! set _($self:selection_wire) {}