1 files changed, 1 insertions, 1 deletions
diff --git a/t/test.pl b/t/test.pl
index 7b1568523a..558466967b 100644
--- a/t/test.pl
+++ b/t/test.pl
@@ -276,7 +276,7 @@ sub like_yn ($$$@) {
 	unshift(@mess, "#      got '$got'\n",
 		"# expected /$expected/\n");
     }
-    local $Level = 2;
+    local $Level = $Level + 1;
     _ok($pass, _where(), $name, @mess);
 }