Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1634
Modified Files: Tag: desiredata desire.c desire.tk Log Message: remove wire_reinit
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.600.2.322 retrieving revision 1.1.2.600.2.323 diff -C2 -d -r1.1.2.600.2.322 -r1.1.2.600.2.323 *** desire.tk 8 Aug 2007 21:43:51 -0000 1.1.2.600.2.322 --- desire.tk 8 Aug 2007 22:36:10 -0000 1.1.2.600.2.323 *************** *** 2838,2847 **** }
- # should be only called from the server - def Canvas wires_reinit {wires} { - eval [concat [list $@wires reinit] $wires] - $self changed wires - } - def Canvas wires {} {return $@wires}
--- 2838,2841 ---- *************** *** 5033,5036 **** --- 5027,5035 ---- }
+ def Wire index= {i} { + super $i + [$@canvas wires] set $i $self + } + def Wire init {mess} { super
Index: desire.c =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v retrieving revision 1.1.2.217.2.194 retrieving revision 1.1.2.217.2.195 diff -C2 -d -r1.1.2.217.2.194 -r1.1.2.217.2.195 *** desire.c 7 Aug 2007 21:03:38 -0000 1.1.2.217.2.194 --- desire.c 8 Aug 2007 22:36:07 -0000 1.1.2.217.2.195 *************** *** 1085,1089 **** } } - gobj_changed(x,"wires"); }
--- 1085,1088 ---- *************** *** 1257,1261 **** if (is_dummy(from)) while (outlet >= obj_noutlets(from)) outlet_new(from, &s_); if (is_dummy(to)) while ( inlet >= obj_ninlets(to)) inlet_new(to,to,&s_,&s_); - gobj_changed(x,"wires"); if (!(oc = obj_connect(from,outlet,to,inlet))) goto bad; pd_set_newest(oc); --- 1256,1259 ---- *************** *** 6015,6021 **** canvas_each(y,can) bar+=sprintf(bar,"%ld x%lx ",y->dix->index,(long)y); sys_mgui(self,"objects_reinit","S",foo); - bar=foo; *foo=0; - canvas_wires_each(oc,t,can) bar+=sprintf(bar,"%ld x%lx ",oc->dix->index,(long)oc); - sys_mgui(self,"wires_reinit","S",foo); sys_mgui(self,"name=","s",can->name); sys_mgui(self,"folder=","s",canvas_getenv(can)->dir); --- 6013,6016 ----