X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~webstump/git?a=blobdiff_plain;f=stump%2Fbin%2Fsubmission.pl;h=fe02ca8e36a25d584686aa2d6d22b93243640a5f;hb=424cad3709c15aaef6179ed03482e93e87283cd3;hp=f978a1fb36d526a1f3b2672611a45bf5646ebf6a;hpb=221ebe04cb5068f3a138c3d2469caf69a21058e9;p=modbot-uram.git diff --git a/stump/bin/submission.pl b/stump/bin/submission.pl index f978a1f..fe02ca8 100755 --- a/stump/bin/submission.pl +++ b/stump/bin/submission.pl @@ -405,13 +405,12 @@ print STDERR "command = $command\n"; open IWJL, ">>/home/webstump/t.log"; print IWJL "=========== SUBMISSION MAIN\n"; -open( COMMAND, "| $command" ); +open( COMMAND, "| $command" ) or die $!; open( TMPFILE, "$TmpFile" ) || die "cant open tmpfile"; $IsBody = 0; while( ) { -print IWJL "SbRt $_\n"; if( $BadNewsserver && !(/^$/) ) { next; @@ -452,8 +451,8 @@ print IWJL "SbRt $_\n"; } } -close( TMPFILE ); -close( COMMAND ); +close( TMPFILE ) or die $!; +close( COMMAND ) or die $!; ################################################################## Archiving # archive