fix offset to skip records just like SQL databases do, and not position us on it

[webpac2] / t / 2-parse.t

diff --git a/t/2-parse.t b/t/2-parse.t
index 1c24231..34a795b 100755 (executable)
--- a/t/2-parse.t
+++ b/t/2-parse.t
@@ -1,7 +1,7 @@
 #!/usr/bin/perl -w
 
 use strict;
-use blib;
+use lib 'lib';
 
 use Test::More tests => 60;
 
@@ -154,5 +154,5 @@ diag "test = ",dump( @test ) if $debug;
 
 ok(! $@, "eval: $@" );
 
-is_deeply( [ @test ], [ "foo", "foo", "bar >>2<<", "bar >>42<<" ], 'sub executed' );
+is_deeply( [ @test ], [ "foo", "foo", "bar >>2<<", "bar >>42<<", 1,2,3 ], 'source fixed' );