Fix precedence.
Brendan O'Dea [Sat, 11 Feb 2006 00:37:15 +0000 (11:37 +1100)]
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

lib/Net/NNTP.pm

index 0467a80..fb4819a 100644 (file)
@@ -120,7 +120,7 @@ sub article
  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)