Test mod covering

[perl/modules/LaTeX-TikZ.git] / t / 10-set.t

diff --git a/t/10-set.t b/t/10-set.t
index 69008aed5d948e3ed2cb011a2e6202bdf7a22c98..f21f587578d972afa6e00e4a27f2ada043b80d16 100644 (file)
--- a/t/10-set.t
+++ b/t/10-set.t
@@ -15,6 +15,8 @@ my $tikz = LaTeX::TikZ::Formatter->new(
 sub check {
  my ($set, $desc, $exp) = @_;
 
+ local $Test::Builder::Level = $Test::Builder::Level + 1;
+
  my ($head, $decl, $body) = eval {
   $tikz->render(ref $set eq 'ARRAY' ? @$set : $set);
  };