h2ph misquotes #error directives

[p5sagit/p5-mst-13.2.git] / t / lib / getopt.t

diff --git a/t/lib/getopt.t b/t/lib/getopt.t
old mode 100644 (file)
new mode 100755 (executable)
index ec2ea49..fb70f10
--- a/t/lib/getopt.t
+++ b/t/lib/getopt.t
@@ -41,7 +41,6 @@ print "ok 7\n";
 # Try illegal options, but avoid printing of the error message
 
 open(STDERR, ">stderr") || die;
-unlink "stderr";
 
 @ARGV = qw(-h help);
 
@@ -69,3 +68,6 @@ print "ok 10\n";
 
 print "not " unless "@ARGV" eq "file";
 print "ok 11\n";
+
+close STDERR;
+unlink "stderr";