Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27647
Modified Files: Tag: desiredata desire.tk Log Message: fixed the fart in def Canvas connect
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.600.2.309 retrieving revision 1.1.2.600.2.310 diff -C2 -d -r1.1.2.600.2.309 -r1.1.2.600.2.310 *** desire.tk 7 Aug 2007 16:16:51 -0000 1.1.2.600.2.309 --- desire.tk 7 Aug 2007 16:21:00 -0000 1.1.2.600.2.310 *************** *** 3712,3717 **** mset {from outlet to inlet} $wire switch $callback { ! none {netsend [list .$self connect $from [dex $@objects $outlet] $to [dex $@objects $inlet]]} ! default {netsend [list .$self connect $from [dex $@objects $outlet] $to [dex $@objects $inlet]] $callback} } $@history add [list $self disconnect $wire] --- 3712,3717 ---- mset {from outlet to inlet} $wire switch $callback { ! none {netsend [list .$self connect [dex $@objects $from] $outlet [dex $@objects $to] $inlet]} ! default {netsend [list .$self connect [dex $@objects $from] $outlet [dex $@objects $to] $inlet] $callback} } $@history add [list $self disconnect $wire]