controlchan bug

Russ Allbery rra at stanford.edu
Sun Dec 29 20:49:34 UTC 2002


Marco d'Itri <md at Linux.IT> writes:

> This is the relevant code from control/checkgroups.pl:

>     open(OLDIN, '<&STDIN') or die $!;
>     open(OLDOUT, '>&STDOUT') or die $!;
>     open(STDIN, "$tempfile.art") or die $!;
>     open(STDOUT, ">$tempfile") or die $!;
>     my $st = system("$inn::controlprogs/docheckgroups", $newsgrouppats);
>     logdie('Cannot run docheckgroups: ' . $!) if $st == -1;
>     logdie('docheckgroups returned status ' . ($st & 255)) if $st > 0;
> +   close STDOUT;
>     open(STDIN, '<&OLDIN') or die $!;
>     open(STDOUT, '>&OLDOUT') or die $!;

Thanks, applied.

-- 
Russ Allbery (rra at stanford.edu)             <http://www.eyrie.org/~eagle/>

    Please send questions to the list rather than mailing me directly.
     <http://www.eyrie.org/~eagle/faqs/questions.html> explains why.


More information about the inn-workers mailing list