From 979b88bb83a77c6e44ed1e636e6723e45bdd7d1a Mon Sep 17 00:00:00 2001
From: Ivica Ico Bukvic <ico@vt.edu>
Date: Wed, 24 Aug 2011 12:48:00 -0400
Subject: [PATCH] Pd-0.42.5-extended-l2ork-dev-20110824.tar.bz2
---
src/g_canvas.c | 3 +++
src/m_pd.h | 2 +-
src/x_connective.c | 5 ++++-
3 files changed, 8 insertions(+), 2 deletions(-)
diff --git a/src/g_canvas.c b/src/g_canvas.c
index 2f032a12d..5afaa9157 100644
--- a/src/g_canvas.c
+++ b/src/g_canvas.c
@@ -501,6 +501,9 @@ void canvas_setgraph(t_glist *x, int flag, int nogoprect);
static void canvas_coords(t_glist *x, t_symbol *s, int argc, t_atom *argv)
{
+ //IB: first delete the graph in case we are downsizing the object size via script
+ canvas_setgraph(x, 0, 0);
+
x->gl_x1 = atom_getfloatarg(0, argc, argv);
x->gl_y1 = atom_getfloatarg(1, argc, argv);
x->gl_x2 = atom_getfloatarg(2, argc, argv);
diff --git a/src/m_pd.h b/src/m_pd.h
index 8215fec50..2672af529 100644
--- a/src/m_pd.h
+++ b/src/m_pd.h
@@ -11,7 +11,7 @@ extern "C" {
#define PD_MAJOR_VERSION 0
#define PD_MINOR_VERSION 42
#define PD_BUGFIX_VERSION 5
-#define PD_TEST_VERSION "extended-l2ork-20110517"
+#define PD_TEST_VERSION "extended-l2ork-20110824"
/* old name for "MSW" flag -- we have to take it for the sake of many old
"nmakefiles" for externs, which will define NT and not MSW */
diff --git a/src/x_connective.c b/src/x_connective.c
index e12d1a33b..aeed72d01 100644
--- a/src/x_connective.c
+++ b/src/x_connective.c
@@ -776,7 +776,10 @@ static void pack_symbol(t_pack *x, t_symbol *s)
static void pack_list(t_pack *x, t_symbol *s, int ac, t_atom *av)
{
- obj_list(&x->x_obj, 0, ac, av);
+ if (ac==0)
+ pack_bang(x);
+ else
+ obj_list(&x->x_obj, 0, ac, av);
}
static void pack_anything(t_pack *x, t_symbol *s, int ac, t_atom *av)
--
GitLab