From 0e92c962dabd566146d84295041961856593eb90 Mon Sep 17 00:00:00 2001 From: Hans-Christoph Steiner Date: Wed, 19 Oct 2011 05:08:12 +0000 Subject: port to 0.43's pdsend proc in pd-gui svn path=/trunk/externals/tof/; revision=15622 --- src/pmenu.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/pmenu.c') diff --git a/src/pmenu.c b/src/pmenu.c index f8d0664..212060f 100644 --- a/src/pmenu.c +++ b/src/pmenu.c @@ -325,8 +325,8 @@ static void *pmenu_new(t_symbol *s, int argc, t_atom *argv) pd_bind(&x->x_obj.ob_pd, x->callback); /* define proc in tcl/tk where "pmenu%p" is the receive, "callback" is the method, and "$index" is an argument. */ - //sys_vgui("proc select%x {index} {\n pd [concat pmenu%p callback $index \\;]\n }\n",x,x); - sys_vgui("proc select%x {index} {\n pd [concat %s callback $index \\;]\n }\n",x,pmenu_buffer); + //sys_vgui("proc select%x {index} {\n pdsend \"pmenu%p callback $index \"\n }\n",x,x); + sys_vgui("proc select%x {index} {\n pdsend \"%s callback $index \"\n }\n",x,pmenu_buffer); x->outlet1 = outlet_new(&x->x_obj, &s_float); x->outlet2 = outlet_new(&x->x_obj, &s_list); -- cgit v1.2.1