remove unused sub

diff --git a/t/test.pm b/t/test.pm
index e588df50e8aca8d3c67ce6e5b17797074d22557a..99648089f171a95bfe7012f8eeab4f8c1eb65b10 100644 (file)
--- a/t/test.pm
+++ b/t/test.pm
@@ -295,14 +295,6 @@ sub restore_output {
   return $string;
 }
 
-sub _test_save_restore_output {
-  warn "to stderr 1\n";
-  save_output("stderr", *STDERR{IO});
-  warn "Hello, Mum!";
-  print 'SAVED:->:', restore_output("stderr"), ":<-\n";
-  warn "to stderr 2\n";
-}
-
 # -------------------------------------
 
 =head2 tmpnam