Expect 21st access to have value 21, not 20!

[perl-indexdata-utils.git] / t / 02-IndexData-Utils-PersistentCounter.t

diff --git a/t/02-IndexData-Utils-PersistentCounter.t b/t/02-IndexData-Utils-PersistentCounter.t
index aa05060..8b57c30 100644 (file)
--- a/t/02-IndexData-Utils-PersistentCounter.t
+++ b/t/02-IndexData-Utils-PersistentCounter.t
@@ -41,7 +41,7 @@ while ((my $pid = wait()) > 0) {
 }
 
 my $n = $counter->next();
-ok($n == 20, "n == 20 after 20 accesses (n=$n)");
+ok($n == 21, "n == 21 on 21 total access (n=$n)");
 
 my $ok = $counter->delete();
 ok($ok, "deleted counter file");