Revision: 10041
http://pure-data.svn.sourceforge.net/pure-data/?rev=10041&view=rev
Author: eighthave
Date: 2008-06-18 16:17:09 -0700 (Wed, 18 Jun 2008)
Log Message:
-----------
removed Enter key binding to flags entry widget since it didn't work, and threw an error everytime
Modified Paths:
--------------
branches/pd-extended/v0-40/pd/src/u_main.tk
Modified: branches/pd-extended/v0-40/pd/src/u_main.tk
===================================================================
--- branches/pd-extended/v0-40/pd/src/u_main.tk 2008-06-18 23:01:51 UTC (rev 10040)
+++ branches/pd-extended/v0-40/pd/src/u_main.tk 2008-06-18 23:17:09 UTC (rev 10041)
@@ -5069,7 +5069,6 @@
label $id.entryname -text {startup flags:}
entry $id.entry -textvariable pd_flags -width 60
- bind $id.entry <KeyPress-Return> [concat dlg_Startup::ok $id]
pdtk_standardkeybindings $id.entry
pack $id.entryname $id.entry -side left
pack $id.entry -side right -padx 2m -fill x -expand 1
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
Revision: 10039
http://pure-data.svn.sourceforge.net/pure-data/?rev=10039&view=rev
Author: eighthave
Date: 2008-06-18 16:01:04 -0700 (Wed, 18 Jun 2008)
Log Message:
-----------
fixed crasher bug related to reusing loaded_libs after calling namelist_free() on it
Modified Paths:
--------------
branches/pd-extended/v0-40/pd/src/import.c
Modified: branches/pd-extended/v0-40/pd/src/import.c
===================================================================
--- branches/pd-extended/v0-40/pd/src/import.c 2008-06-18 22:58:18 UTC (rev 10038)
+++ branches/pd-extended/v0-40/pd/src/import.c 2008-06-18 23:01:04 UTC (rev 10039)
@@ -47,7 +47,6 @@
{
t_object x_obj;
t_canvas *x_canvas;
- t_namelist *x_top;
t_namelist *x_current;
char x_classpath_root[FILENAME_MAX];
t_outlet *x_data_outlet;
@@ -147,10 +146,14 @@
static void import_free(t_import *x)
{
import_instance_count--;
+/* TODO perhaps loaded_libs should be an instance variable */
if(import_instance_count == 0)
{
- namelist_free(loaded_libs);
- loaded_libs = NULL;
+ if(loaded_libs)
+ {
+ namelist_free(loaded_libs);
+ loaded_libs = NULL;
+ }
}
/* TODO: perhaps this should remove any libs that this instance had added to
* the namespace */
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
Revision: 10037
http://pure-data.svn.sourceforge.net/pure-data/?rev=10037&view=rev
Author: lukeiannini
Date: 2008-06-18 14:06:16 -0700 (Wed, 18 Jun 2008)
Log Message:
-----------
getpatchname parent query capability and helpfile to match
Modified Paths:
--------------
trunk/externals/postlude/getpatchname/doc/getpatchname-help.pd
trunk/externals/postlude/getpatchname/src/getpatchname.c
Modified: trunk/externals/postlude/getpatchname/doc/getpatchname-help.pd
===================================================================
--- trunk/externals/postlude/getpatchname/doc/getpatchname-help.pd 2008-06-18 20:57:21 UTC (rev 10036)
+++ trunk/externals/postlude/getpatchname/doc/getpatchname-help.pd 2008-06-18 21:06:16 UTC (rev 10037)
@@ -1,4 +1,4 @@
-#N canvas 0 0 450 300 10;
+#N canvas 0 22 426 546 10;
#X obj 160 101 loadbang;
#X symbolatom 160 170 20 0 0 0 - - -;
#X obj 239 102 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
@@ -9,6 +9,23 @@
#X text 26 236 Note: at the moment it retains the name of the patch
returned when the object was instantiated. This will be revised in
future versions;
+#X msg 87 359 bang;
+#X obj 87 435 print;
+#X msg 282 356 bang;
+#X obj 282 432 print;
+#X text 26 468 If there is no parent at that level \, it returns the
+directory as if there was no argument \, i.e. level 0;
+#X text 26 302 You can also get the name of the parent patch \, if
+this patch is an object embedded in another patch. You use the argument
+to set how many levels up to go:;
+#X obj 87 397 getpatchname 1;
+#X obj 282 394 getpatchname 2;
+#X text 27 509 (thanks to Gunter Geiger for "parent" code and helptext)
+;
#X connect 0 0 4 0;
#X connect 2 0 4 0;
#X connect 4 0 1 0;
+#X connect 6 0 12 0;
+#X connect 8 0 13 0;
+#X connect 12 0 7 0;
+#X connect 13 0 9 0;
Modified: trunk/externals/postlude/getpatchname/src/getpatchname.c
===================================================================
--- trunk/externals/postlude/getpatchname/src/getpatchname.c 2008-06-18 20:57:21 UTC (rev 10036)
+++ trunk/externals/postlude/getpatchname/src/getpatchname.c 2008-06-18 21:06:16 UTC (rev 10037)
@@ -1,4 +1,3 @@
-
/* getpatchname - Returns the filename of the current patch
*
* Copyright (C) 2006 Jamie Bullock
@@ -27,28 +26,38 @@
t_object x_obj;
t_symbol *patch_name;
t_outlet *outlet;
+ t_canvas *x_canvas;
+ int x_level;
} t_getpatchname;
void getpatchname_bang(t_getpatchname *x)
{
/* At some point we need to be to get the new patch name if it changes, couldn't make this work though */
- outlet_symbol(x->outlet, x->patch_name);
+ int i = x->x_level;
+ t_canvas* last = x->x_canvas;
+
+ while (i>0) {
+ i--;
+ if (last->gl_owner) last = last->gl_owner;
+ }
+
+ outlet_symbol(x->outlet, last->gl_name);
}
-void *getpatchname_new(void)
+void *getpatchname_new(t_floatarg level)
{
t_getpatchname *x = (t_getpatchname *)pd_new(getpatchname_class);
x->patch_name = canvas_getcurrent()->gl_name;
+ x->x_canvas = canvas_getcurrent();
x->outlet = outlet_new(&x->x_obj, &s_symbol);
+ x->x_level = level;
return (void *)x;
}
void getpatchname_setup(void) {
getpatchname_class = class_new(gensym("getpatchname"),
(t_newmethod)getpatchname_new,
- 0, sizeof(t_getpatchname),
- CLASS_DEFAULT, 0);
+ 0, sizeof(t_getpatchname), 0,
+ A_DEFFLOAT, 0);
class_addbang(getpatchname_class, getpatchname_bang);
}
-
-
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
Revision: 10036
http://pure-data.svn.sourceforge.net/pure-data/?rev=10036&view=rev
Author: eighthave
Date: 2008-06-18 13:57:21 -0700 (Wed, 18 Jun 2008)
Log Message:
-----------
added doc section to the v0-40 release branch
Added Paths:
-----------
branches/pd-extended/v0-40/doc/
Copied: branches/pd-extended/v0-40/doc (from rev 10035, trunk/doc)
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.