X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=regcomp.pl;h=239787ae554ea11a1aa7ff4a6e31a1712092a2c2;hb=c30d8139ead4f83c6b3d27b2eace9ff0466eaf4c;hp=b6fc11dae18c089ec7e03b58860893e8f6c05678;hpb=424a4936e3f61f4e8db394f496a116e698cede85;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/regcomp.pl b/regcomp.pl
index b6fc11d..239787a 100644
--- a/regcomp.pl
+++ b/regcomp.pl
@@ -223,6 +223,6 @@ print $out <<EOP;
 
 /* ex: set ro: */
 EOP
-close $out or die "close $tmp_h: $!";
+safer_close($out);
 
 rename_if_different $tmp_h, 'regnodes.h';