close files.

diff --git a/util/mk1mf.pl b/util/mk1mf.pl
index 4647fc7a035a1eaee7b2ce1b154f08294eeb71b9..e4596bebb201a7c3eccbd38a5a65ddcc6489a493 100755 (executable)
--- a/util/mk1mf.pl
+++ b/util/mk1mf.pl
@@ -420,9 +420,11 @@ if (open(IN,"crypto/mk1mfinf.h"))
                        $old_mk1mfinf_h .= $_;
                        }
                }
+       close(IN);
 
        open(OUT,">crypto/mk1mfinf.h") || die "Can't open mk1mfinf.h";
        print OUT $old_mk1mfinf_h;
+       close(OUT);
        }
 
 open (OUT,">>crypto/mk1mfinf.h") || die "Can't open mk1mfinf.h";