Subject: [PATCH] 5.8.8: Debian patches
From: "Brendan O'Dea" <bod@debian.org>
Message-ID: <
20060210133715.GA6826@londo.c47.org>
p4raw-id: //depot/perl@27211
my $nntp = shift;
my @fh;
- @fh = (pop) if @_ == 2 || (@_ && ref($_[0]) || ref(\$_[0]) eq 'GLOB');
+ @fh = (pop) if @_ == 2 || (@_ && (ref($_[0]) || ref(\$_[0]) eq 'GLOB'));
$nntp->_ARTICLE(@_)
? $nntp->read_until_dot(@fh)