From 8eaed95e027bcf66b61611871bc12e0cb110d859 Mon Sep 17 00:00:00 2001
From: gfx <gfuji@cpan.org>
Date: Thu, 16 Sep 2010 20:44:51 +0900
Subject: [PATCH] Fix an use of execute()

---
 perl/t/06_stream_unpack2.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/t/06_stream_unpack2.t b/perl/t/06_stream_unpack2.t
index 78ca8f7c..25af21d4 100644
--- a/perl/t/06_stream_unpack2.t
+++ b/perl/t/06_stream_unpack2.t
@@ -35,7 +35,7 @@ is_deeply(Data::MessagePack->unpack($packed), $input);
     while( read($stream, $buff, $size) ) {
         note "buff: ", join " ", map { unpack 'H2', $_ } split //, $buff;
 
-        $up->execute($buff);
+        $up->execute($buff, 0);
     }
     ok $up->is_finished, 'is_finished';
     my $data = $up->data;