X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/fe4f778754e1e2a5e05eddcd123ab68c16b18ab9..b561f196294beb142a9daf3d93f7d3f067e07fe7:/Porting/make_snapshot.pl diff --git a/Porting/make_snapshot.pl b/Porting/make_snapshot.pl index cab61b1..70a4c3d 100755 --- a/Porting/make_snapshot.pl +++ b/Porting/make_snapshot.pl @@ -71,6 +71,7 @@ if (!-e "$path/$gz_file") { close $fh; } system("tar -f $tar_file --transform='s,^$$,$prefix,g' --owner=root --group=root --mode=664 --append $$.patch"); + unlink "$$.patch"; system("gzip -S .gz -9 $tar_file"); rename "$tar_file.gz", "$gz_file"; }