From 2e5ccab5e2f56378d39169316a6788fbe8423c77 Mon Sep 17 00:00:00 2001
From: Guillem <guillembartrina@gmail.com>
Date: Tue, 18 Aug 2020 21:38:32 +0200
Subject: [PATCH] fix wrong initalized env for [ab] that prevented them from
using filesystem utilities
---
pd/src/g_canvas.c | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/pd/src/g_canvas.c b/pd/src/g_canvas.c
index bfa46548d..bc3142948 100644
--- a/pd/src/g_canvas.c
+++ b/pd/src/g_canvas.c
@@ -1927,10 +1927,11 @@ static char ab_templatecanvas[] = "#N canvas;\n";
/* create an ab instance from its source */
static t_pd *do_create_ab(t_ab_definition *abdef, int argc, t_atom *argv)
{
-
canvas_setargs(argc, argv);
int dspstate = canvas_suspend_dsp();
- glob_setfilename(0, abdef->ad_name, gensym("[ab]"));
+ char filename[MAXPDSTRING];
+ sprintf(filename, "[ab] %s", abdef->ad_name->s_name);
+ glob_setfilename(0, gensym(filename), canvas_getdir(canvas_getcurrent()));
canvas_setabsource(abdef); // set the ab source
binbuf_eval(abdef->ad_source, 0, 0, 0);
--
GitLab