aboutsummaryrefslogtreecommitdiff
path: root/shared/toxy
diff options
context:
space:
mode:
Diffstat (limited to 'shared/toxy')
-rw-r--r--shared/toxy/scriptlet.c9
1 files changed, 6 insertions, 3 deletions
diff --git a/shared/toxy/scriptlet.c b/shared/toxy/scriptlet.c
index 42e3c02..db836ab 100644
--- a/shared/toxy/scriptlet.c
+++ b/shared/toxy/scriptlet.c
@@ -380,17 +380,17 @@ static char *scriptlet_dedot(t_scriptlet *sp, char *ibuf,
{
if (ibuf[1] == ':')
{
- sprintf(obuf, "{pd [concat ");
+ sprintf(obuf, "{pdsend [concat ");
len = 2;
}
else if (ibuf[1] == '|')
{
- sprintf(obuf, "{pd [concat %s ", sp->s_rptarget->s_name);
+ sprintf(obuf, "{pdsend [concat %s ", sp->s_rptarget->s_name);
len = 2;
}
else
{
- sprintf(obuf, "{pd [concat %s _cb ", sp->s_cbtarget->s_name);
+ sprintf(obuf, "{pdsend [concat %s _cb ", sp->s_cbtarget->s_name);
len = 1;
}
}
@@ -1064,6 +1064,9 @@ t_scriptlet *scriptlet_new(t_pd *owner,
sys_gui(" pd [concat $target _rp $::toxy::reply \\;]\n");
sys_gui(" unset ::toxy::reply\n");
sys_gui("}\n");
+ /* if older than 0.43, create an 0.43-style pdsend */
+ sys_gui("if {[llength [info procs ::pdsend]] == 0} {");
+ sys_gui("proc ::pdsend {args} {::pd \"[join $args { }] ;\"}}\n");
configured = 1;
}
sp->s_owner = owner;