[PD-cvs] pd/src desire.c,1.1.2.80,1.1.2.81

[Mathieu Bouchard]

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

Modified Files:
      Tag: devel_0_39
	desire.c 
Log Message:
method "object_delete" in canvas class.


Index: desire.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v
retrieving revision 1.1.2.80
retrieving revision 1.1.2.81
diff -C2 -d -r1.1.2.80 -r1.1.2.81
*** desire.c	11 Jun 2006 18:12:48 -0000	1.1.2.80
--- desire.c	12 Jun 2006 17:32:25 -0000	1.1.2.81
***************
*** 11586,11589 ****
--- 11586,11595 ----
  	gobj_changed(o,0);
  }
+ static void canvas_object_delete(t_canvas *x, t_symbol *name) {
+ 	t_text *o;
+ 	if (sscanf(name->s_name,"!x%lx",(long*)&o)<1) {error("gargamel was here"); return;}
+ 	glist_delete(x,o);
+ 	gobj_changed(x,0);
+ }
  
  void g_text_setup(void) {
***************
*** 12883,12888 ****
      class_addcreator((t_newmethod)table_new, gensym("table"), A_DEFSYM, A_DEFFLOAT, 0);
  
!     class_addmethod3(c,canvas_mousedown,"mouse","ffff");
!     class_addmethod3(c,canvas_mouseup,"mouseup","fff");
      class_addmethod3(c,canvas_key,"key","*");
      class_addmethod3(c,canvas_motion,"motion","fff");
--- 12889,12894 ----
      class_addcreator((t_newmethod)table_new, gensym("table"), A_DEFSYM, A_DEFFLOAT, 0);
  
! //  class_addmethod3(c,canvas_mousedown,"mouse","ffff");
! //  class_addmethod3(c,canvas_mouseup,"mouseup","fff");
      class_addmethod3(c,canvas_key,"key","*");
      class_addmethod3(c,canvas_motion,"motion","fff");
***************
*** 12937,12940 ****
--- 12943,12947 ----
  // dd-specific
      class_addmethod3(c,canvas_object_moveto,"object_moveto","sff");
+     class_addmethod3(c,canvas_object_delete,"object_delete","s");
      class_addmethod3(c,canvas_text_setto,"text_setto","*");
      class_setnotice(c, canvas_notice);