X-Git-Url: https://code.th-h.de/?p=usenet%2Fyapfaq.git;a=blobdiff_plain;f=yapfaq.pl;h=bce96847517acc2268cb1f455804b138745e7e0b;hp=5b7160a27a92835946865b73fba1aba41c791530;hb=d69ba0bb348ffe87f0ead8497467b0aec5a10751;hpb=dbca4ad8a165e3d51fe4caed45f9a3ee04bf5db0;ds=sidebyside diff --git a/yapfaq.pl b/yapfaq.pl index 5b7160a..bce9684 100644 --- a/yapfaq.pl +++ b/yapfaq.pl @@ -305,7 +305,7 @@ sub post { my $NewsConnection = Net::NNTP->new($NNTPServer, Reader => 1) or die "$0: E: Can't connect to news server '$NNTPServer'!\n"; - $NewsConnection->authinfo ($NNTPUser, $NNTPPass); + $NewsConnection->authinfo ($NNTPUser, $NNTPPass) if (defined($NNTPUser)); $NewsConnection->post(); $NewsConnection->datasend (@$ArticleR); $NewsConnection->dataend();