1 files changed, 1 insertions, 1 deletions
diff --git a/t/base/rs.t b/t/base/rs.t
index 306d646e6d..f89c84e3a0 100755
--- a/t/base/rs.t
+++ b/t/base/rs.t
@@ -11,7 +11,7 @@ rmdir 'foo';
 open TESTFILE, ">./foo" or die "error $! $^E opening";
 binmode TESTFILE;
 print TESTFILE $teststring;
-close TESTFILE;
+close TESTFILE or die "error $! $^E closing";
 
 open TESTFILE, "<./foo";
 binmode TESTFILE;