}
close FH;
} else {
- warn "Couldn't open $File.cfg: $!";
+ warn "Couldn't open $File.cfg: $!\n";
}
$SupersedeMID = "" unless $Supersede;
if (!$NewsConnection->ok()) {
open FH, ">>ERROR.dat";
- print FH "\nPosting failed! Response from news server:\n";
+ print FH "\nPosting failed! Saving to ERROR.dat. Response from news server:\n";
print FH $NewsConnection->code();
print FH $NewsConnection->message();
print FH "\n";