[PD-cvs] SF.net SVN: pure-data: [9740] trunk/packages/patches/ allow_spaces_in_new_directory-0.41.4.patch

eighthave at users.sourceforge.net eighthave at users.sourceforge.net
Mon Apr 28 21:08:53 CEST 2008


Revision: 9740
          http://pure-data.svn.sourceforge.net/pure-data/?rev=9740&view=rev
Author:   eighthave
Date:     2008-04-28 12:08:52 -0700 (Mon, 28 Apr 2008)

Log Message:
-----------
simpler patch using pdtk_enquote instead of custom kludge

Modified Paths:
--------------
    trunk/packages/patches/allow_spaces_in_new_directory-0.41.4.patch

Modified: trunk/packages/patches/allow_spaces_in_new_directory-0.41.4.patch
===================================================================
--- trunk/packages/patches/allow_spaces_in_new_directory-0.41.4.patch	2008-04-28 18:10:15 UTC (rev 9739)
+++ trunk/packages/patches/allow_spaces_in_new_directory-0.41.4.patch	2008-04-28 19:08:52 UTC (rev 9740)
@@ -1,47 +1,14 @@
-Index: m_glob.c
+Index: u_main.tk
 ===================================================================
---- m_glob.c	(revision 9721)
-+++ m_glob.c	(working copy)
-@@ -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(void *dummy, t_symbol *name, t_symbol *dir);
-+void glob_setfilename_gimme(void *dummy, t_symbol *s, int argc, t_atom *argv);
- 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, gensym("filename"),
--        A_SYMBOL, A_SYMBOL, 0);
-+    class_addmethod(glob_pdobject, (t_method)glob_setfilename_gimme, 
-+        gensym("filename"), A_GIMME, 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);
-Index: g_canvas.c
-===================================================================
---- g_canvas.c	(revision 9726)
-+++ g_canvas.c	(working copy)
-@@ -138,6 +138,18 @@
-     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));
+--- u_main.tk	(revision 9735)
++++ u_main.tk	(working copy)
+@@ -413,7 +413,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.




More information about the Pd-cvs mailing list