Andreas Barth <aba@ayous.org> (2014-10-15):
> diff --git a/lib/Buildd/Mail.pm b/lib/Buildd/Mail.pm
> index cff1880..9741955 100644
> --- a/lib/Buildd/Mail.pm
> +++ b/lib/Buildd/Mail.pm
> @@ -576,6 +576,7 @@ sub prepare_for_upload ($$) {
> my $pkg_noep = $pkg;
> $pkg_noep =~ s/_\d*:/_/;
> my $changes_name = $pkg_noep . "_" . $changes_filename_arch . ".changes";
> + my $upload_name = $pkg_noep . "_" . $changes_filename_arch . ".upload";
>
> for my $upload_dir (@upload_dirs) {
> if (! -d $upload_dir &&!mkdir( $upload_dir, 0750 )) {
> @@ -597,6 +598,7 @@ sub prepare_for_upload ($$) {
> }
> }
>
> + system("rm -f -- $upload_dir/$upload_name");
perldoc -f unlink
> open( F, ">$upload_dir/$changes_name" );
> print F $changes;
> close( F );
Mraw,
KiBi.
Attachment:
signature.asc
Description: Digital signature