- } elsif ( $do_report && !$problems_reported ) {
-
- # otherwise, send a problem report, if not done already
- msg(
- "mail",
- "Due to the errors above, the .changes file couldn't ",
- "be processed.\n",
- "Please fix the problems for the upload to happen.\n"
- );
-
- # remember we already have sent a mail regarding this file
- debug("Sending problem report mail and setting SGID bit");
- my $mode = $changes_stats[ST_MODE] |= S_ISGID;
- msg( "log", "chmod failed: $!" )
- if ( chmod( $mode, $changes ) != 1 );
- } ## end elsif ( $do_report && !$problems_reported)