Optimize performance of text listing
Change-Id: Id89f0bd6b73ecbc40ea98e3cd7da3a97b8af2baa
diff --git a/t/archive.t b/t/archive.t
index 4a729b6..22ad61f 100644
--- a/t/archive.t
+++ b/t/archive.t
@@ -21,7 +21,7 @@
my @list = $archive->list_texts;
is(scalar @list, 10, 'Found all tests');
is($list[0], './TEST/BSP/1', 'First document');
-is($list[-1], './TEST/BSP/9', 'First document');
+is($list[-1], './TEST/BSP/10', 'First document');
my @path = $archive->split_path('./TEST/BSP/9');
is($path[0],'.', 'Prefix');