From 2e7b413611f233621a9caff1eb9813e2f7c1b0ab Mon Sep 17 00:00:00 2001
From: Sojourner Truth <jon.w.wilkes@gmail.com>
Date: Thu, 14 Jul 2016 01:27:44 -0400
Subject: [PATCH] quick fix for #88: "couldn't unbind" messages when array
object is deleted
---
pd/src/g_scalar.c | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/pd/src/g_scalar.c b/pd/src/g_scalar.c
index 1cc3bff76..fa4764c2a 100644
--- a/pd/src/g_scalar.c
+++ b/pd/src/g_scalar.c
@@ -1014,7 +1014,8 @@ static void scalar_vis(t_gobj *z, t_glist *owner, int vis)
sprintf(tagbuf, "scalar%lx", (long unsigned int)x->sc_vec);
gui_vmess("gui_scalar_erase", "xs",
glist_getcanvas(owner), tagbuf);
- pd_unbind(&x->sc_gobj.g_pd, gensym(buf));
+ if (gensym(buf)->s_thing)
+ pd_unbind(&x->sc_gobj.g_pd, gensym(buf));
}
sys_unqueuegui(x);
--
GitLab