more compatibility with [pack] (that's important on Pd>=0.42)

svn path=/trunk/externals/zexy/; revision=9983

1 files changed, 3 insertions, 2 deletions

diff --git a/src/pack.c b/src/pack.c
index 39ae244..cf65f46 100644
--- a/src/pack.c
+++ b/src/pack.c
@@ -59,8 +59,9 @@ static void zpack_bang(t_zpack*x) {
 }
 
 static void zpack_list0(t_zpack*x, t_symbol *s, int argc, t_atom *argv) {
-  if(argc>0)
-    setatom(x, argv, 0);
+  int i=0;
+  for(i=0; i<argc && i<x->x_argc; i++)
+    setatom(x, argv+i, i);
   zpack_bang(x);
 }