[PD-cvs] pd/src desire.c,1.1.2.217.2.157,1.1.2.217.2.158

[Mathieu Bouchard]

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

Modified Files:
      Tag: desiredata
	desire.c 
Log Message:
fixed undoing of delete of comment


Index: desire.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v
retrieving revision 1.1.2.217.2.157
retrieving revision 1.1.2.217.2.158
diff -C2 -d -r1.1.2.217.2.157 -r1.1.2.217.2.158
*** desire.c	14 Jul 2007 02:04:33 -0000	1.1.2.217.2.157
--- desire.c	14 Jul 2007 12:58:16 -0000	1.1.2.217.2.158
***************
*** 5877,5891 ****
  	if (argv[2].a_type != A_SYMBOL) {pd_error(x,"$2 must be symbol"); return;}
  	s = argv[2].a_symbol;
  	if (s == gensym("obj")) {
  	        /* b = binbuf_new(); binbuf_restore(b, argc-5, argv+5);
      		canvas_objtext(x,atom_getintarg(3,argc,argv),atom_getintarg(4,argc,argv),0,b); */
! 		x->next_add = i; canvas_obj(x,gensym("obj"),argc-3,argv+3); x->next_add = -1;
  	} else if (s == gensym("floatatom")) {
! 		x->next_add = i; canvas_atom(x,A_FLOAT, argc-3,argv+3); x->next_add = -1;
  	} else if (s == gensym("symbolatom")) {
! 		x->next_add = i; canvas_atom(x,A_SYMBOL,argc-3,argv+3); x->next_add = -1;
  	} else post("UNSUPPORTED object_insert: %s",s->name);
  	/* canvas_reorder_last(x,i); */
  	gobj_changed(x,"children");
  /*err: pd_popsym(x);*/
  }
--- 5877,5897 ----
  	if (argv[2].a_type != A_SYMBOL) {pd_error(x,"$2 must be symbol"); return;}
  	s = argv[2].a_symbol;
+ 	x->next_add = i;
  	if (s == gensym("obj")) {
  	        /* b = binbuf_new(); binbuf_restore(b, argc-5, argv+5);
      		canvas_objtext(x,atom_getintarg(3,argc,argv),atom_getintarg(4,argc,argv),0,b); */
! 		canvas_obj(x,s,argc-3,argv+3);
! 	} else if (s == gensym("restore")) {
! 		canvas_restore(x,s,argc-3,argv+3);
  	} else if (s == gensym("floatatom")) {
! 		canvas_floatatom(x,s,argc-3,argv+3);
  	} else if (s == gensym("symbolatom")) {
! 		canvas_floatatom(x,s,argc-3,argv+3);
! 	} else if (s == gensym("text")) {
! 		canvas_text(x,gensym("text"),argc-3,argv+3);
  	} else post("UNSUPPORTED object_insert: %s",s->name);
  	/* canvas_reorder_last(x,i); */
  	gobj_changed(x,"children");
+  	x->next_add = -1;
  /*err: pd_popsym(x);*/
  }