write.t: Eek! debugging code

diff --git a/t/op/write.t b/t/op/write.t
index 3fafc20..7dcf1e0 100644 (file)
--- a/t/op/write.t
+++ b/t/op/write.t
@@ -1111,7 +1111,6 @@ format Potshriggley =
    Scalar::Util::weaken(my $x = *Potshriggley{FORMAT});
    undef *Potshriggley;
    is $x, undef, 'formats in subs do not leak';
-   use Devel::Peek; Dump $x if $x;
 }