[PD-cvs] SF.net SVN: pure-data: [9737] branches/pd-extended/v0-40/pd/src

[eighthave at users.sourceforge.net]

Revision: 9737
          http://pure-data.svn.sourceforge.net/pure-data/?rev=9737&view=rev
Author:   eighthave
Date:     2008-04-28 09:54:42 -0700 (Mon, 28 Apr 2008)

Log Message:
-----------
removed my kludge and replaced it with pdtk_enquote since it is used throughout and seems to work

Modified Paths:
--------------
    branches/pd-extended/v0-40/pd/src/g_canvas.c
    branches/pd-extended/v0-40/pd/src/m_glob.c
    branches/pd-extended/v0-40/pd/src/u_main.tk

Modified: branches/pd-extended/v0-40/pd/src/g_canvas.c
===================================================================
--- branches/pd-extended/v0-40/pd/src/g_canvas.c	2008-04-28 16:53:23 UTC (rev 9736)
+++ branches/pd-extended/v0-40/pd/src/g_canvas.c	2008-04-28 16:54:42 UTC (rev 9737)
@@ -138,18 +138,6 @@
     canvas_newdirectory = dirsym;
 }
 
-void glob_setfilename_gimme(void *dummy, t_symbol *s, int argc, t_atom *argv)
-{
-    int bufsize;
-    char *buf;
-    t_binbuf *b = binbuf_new();
-    canvas_newfilename = atom_getsymbolarg(0, argc, argv);
-    binbuf_add(b, argc - 1, argv + 1);
-    binbuf_gettext(b, &buf, &bufsize);
-    buf[bufsize] = 0;
-    canvas_newdirectory = gensym(buf);
-}
-
 t_canvas *canvas_getcurrent(void)
 {
     return ((t_canvas *)pd_findbyclass(&s__X, canvas_class));

Modified: branches/pd-extended/v0-40/pd/src/m_glob.c
===================================================================
--- branches/pd-extended/v0-40/pd/src/m_glob.c	2008-04-28 16:53:23 UTC (rev 9736)
+++ branches/pd-extended/v0-40/pd/src/m_glob.c	2008-04-28 16:54:42 UTC (rev 9737)
@@ -11,7 +11,7 @@
 /* These "glob" routines, which implement messages to Pd, are from all
 over.  Some others are prototyped in m_imp.h as well. */
 
-void glob_setfilename_gimme(void *dummy, t_symbol *s, int argc, t_atom *argv);
+void glob_setfilename(void *dummy, t_symbol *filesym, t_symbol *dirsym);
 void glob_verifyquit(void *dummy, t_floatarg f);
 void glob_dsp(void *dummy, t_symbol *s, int argc, t_atom *argv);
 void glob_meters(void *dummy, t_floatarg f);
@@ -74,8 +74,8 @@
         CLASS_DEFAULT, A_NULL);
     class_addmethod(glob_pdobject, (t_method)glob_initfromgui, gensym("init"),
         A_GIMME, 0);
-    class_addmethod(glob_pdobject, (t_method)glob_setfilename_gimme, 
-        gensym("filename"), A_GIMME, 0);
+    class_addmethod(glob_pdobject, (t_method)glob_setfilename, 
+        gensym("filename"), A_SYMBOL, A_SYMBOL, 0);
     class_addmethod(glob_pdobject, (t_method)glob_evalfile, gensym("open"),
         A_SYMBOL, A_SYMBOL, 0);
     class_addmethod(glob_pdobject, (t_method)glob_quit, gensym("quit"), 0);

Modified: branches/pd-extended/v0-40/pd/src/u_main.tk
===================================================================
--- branches/pd-extended/v0-40/pd/src/u_main.tk	2008-04-28 16:53:23 UTC (rev 9736)
+++ branches/pd-extended/v0-40/pd/src/u_main.tk	2008-04-28 16:54:42 UTC (rev 9737)
@@ -421,7 +421,8 @@
 proc menu_new {} {
     global untitled_number
     global untitled_directory
-    pd [concat pd filename Untitled-$untitled_number $untitled_directory \;]
+    pd [concat pd filename Untitled-$untitled_number \
+			[pdtk_enquote $untitled_directory] \;]
     pd {
         #N canvas;
         #X pop 1;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.