[PD-cvs] pd/src desire.c,1.1.2.84,1.1.2.85

Mathieu Bouchard matju at users.sourceforge.net
Sat Jul 1 08:30:51 CEST 2006


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

Modified Files:
      Tag: devel_0_39
	desire.c 
Log Message:
fix for saving iemgui.
also began to write code for #V.


Index: desire.c
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.c,v
retrieving revision 1.1.2.84
retrieving revision 1.1.2.85
diff -C2 -d -r1.1.2.84 -r1.1.2.85
*** desire.c	1 Jul 2006 04:20:02 -0000	1.1.2.84
--- desire.c	1 Jul 2006 06:30:48 -0000	1.1.2.85
***************
*** 3,7 ****
    This file is part of DesireData.
    Copyright (c) 2004-2006 by Mathieu Bouchard.
!   Copyright (c) 1997-2001 Miller Puckette.
    Portions by Guenther Geiger, Krzysztof Czaja, Johannes Zmoelnig, Thomas Musil, etc.
    The remains of IEMGUI Copyright (c) 2000-2001 Thomas Musil (IEM KUG Graz Austria)
--- 3,7 ----
    This file is part of DesireData.
    Copyright (c) 2004-2006 by Mathieu Bouchard.
!   Copyright (c) 1997-2005 Miller Puckette.
    Portions by Guenther Geiger, Krzysztof Czaja, Johannes Zmoelnig, Thomas Musil, etc.
    The remains of IEMGUI Copyright (c) 2000-2001 Thomas Musil (IEM KUG Graz Austria)
***************
*** 68,71 ****
--- 68,84 ----
  }
  
+ void appendix_save (t_gobj *master, t_binbuf *b) {
+ 	t_hash *h = master->g_adix->visual;
+ 	if (hash_size(h)) {
+ 	    hashkey k;
+ 	    hashvalue v;
+ 	    int i=0;
+ 	    binbuf_addv(b, "s", gensym("#V"));
+ 	    hash_foreach(k,v,h) {
+ 		if (i+1==hash_size(h)) binbuf_addv(b, ";"); else binbuf_addv(b, "s", gensym(","));
+ 	    }
+         }
+ }
+ 
  void appendix_free (t_gobj *master) {
  	t_appendix *self = master->g_adix;
***************
*** 6714,6717 ****
--- 6727,6731 ----
  }
  
+ /* should die */
  static void canvas_menusaveas(t_canvas *x)
  {
***************
*** 6721,6724 ****
--- 6735,6739 ----
  }
  
+ /* should die */
  static void canvas_menusave(t_canvas *x)
  {
***************
*** 6731,6734 ****
--- 6746,6757 ----
  }
  
+ static void canvas_save_as(t_canvas *x, t_symbol *name)
+ {
+     t_canvas *x2 = canvas_getrootfor(x);
+     post("canvas_save_as: old name: %s\n",x2->gl_name->s_name);
+     x2->gl_name = name;
+     post("canvas_save_as: new name: %s\n",x2->gl_name->s_name);
+     canvas_savetofile(x2, x2->gl_name, canvas_getdir(x2));
+ }
  
  ///////////////////////////////////////////////////////////////////////////
***************
*** 11287,11291 ****
          binbuf_addbinbuf(b, x->te_binbuf);
          binbuf_addv(b, ";");
!     }    	
  }
  
--- 11310,11315 ----
          binbuf_addbinbuf(b, x->te_binbuf);
          binbuf_addv(b, ";");
!     }
!     appendix_save(z,b);
  }
  
***************
*** 11555,11558 ****
--- 11579,11583 ----
      }
  break2:
+     binbuf_addv(b, ";");
      return 1;
  err:
***************
*** 12709,12712 ****
--- 12734,12738 ----
      class_addmethod3(c,canvas_menusave,  "menusave","");
      class_addmethod3(c,canvas_menusaveas,"menusaveas","");
+ //  class_addmethod3(c,canvas_save_as,   "save_as","s");
  
      class_setwidget(c, &graph_widgetbehavior);





More information about the Pd-cvs mailing list