X-Git-Url: http://git.ieval.ro/?p=slob.git;a=blobdiff_plain;f=t%2FSlob.t;h=395c59eba88286f79a890d2bf50c614efdccf8bd;hp=b0ab28f8921c9a35d591948e041f5b5e302fb957;hb=0e15b49616308e77f3f6ede65711ea70a876af47;hpb=29d65ef5696fb186409f1e1ca812013b131112d5

diff --git a/t/Slob.t b/t/Slob.t
index b0ab28f..395c59e 100644
--- a/t/Slob.t
+++ b/t/Slob.t
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More tests => 6;
+use Test::More tests => 7;
 BEGIN { use_ok('Slob') };
 
 my $slob = Slob->new('t/freedict-01.slob');
@@ -27,3 +27,5 @@ my $expected = <<'EOF';
 EOF
 chomp $expected;
 is $slob->get_entry_of_storage_bin($bin, $second_ref->{item_index}), $expected;
+
+is $slob->seek_and_read_ref_and_data(4)->{data}, $expected;