diff --git a/src/g_canvas.c b/src/g_canvas.c
index 2f032a12d6ef37c4983669f6072f170bfd3dbfeb..5afaa9157cbed0eec122976e70cf7798e408c81e 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 8215fec50029d3afb21c6202f2fc2750bb0da851..2672af5292d7a343f9a638cc403053b0d0a7b12a 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 e12d1a33b674065b814194f44ed8565772fd8709..aeed72d013aed4f0ece62162db3584dc1e09a5cc 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)