Add regression test for bug #38475

[p5sagit/p5-mst-13.2.git] / t / io / nargv.t

diff --git a/t/io/nargv.t b/t/io/nargv.t
index fb13857..97ab639 100755 (executable)
--- a/t/io/nargv.t
+++ b/t/io/nargv.t
@@ -44,6 +44,7 @@ sub show {
 }
 
 sub other {
+    no warnings 'once';
     print STDOUT "# Calling other\n";
     local *ARGV;
     local *ARGVOUT;