projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
fe4f778
)
dont leave temporary files laying around
author
Yves Orton
<demerphq@gemini.(none)>
Tue, 28 Jul 2009 11:04:22 +0000
(13:04 +0200)
committer
Yves Orton
<demerphq@gemini.(none)>
Tue, 28 Jul 2009 11:04:22 +0000
(13:04 +0200)
Porting/make_snapshot.pl
patch
|
blob
|
history
diff --git
a/Porting/make_snapshot.pl
b/Porting/make_snapshot.pl
index
cab61b1
..
70a4c3d
100755
(executable)
--- 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";
}