summaryrefslogtreecommitdiff
path: root/utils
diff options
context:
space:
mode:
authorAlexandr Ciornii <alexchorny@gmail.com>2011-09-07 00:30:46 +0300
committerFather Chrysostomos <sprout@cpan.org>2011-12-05 13:44:00 -0800
commit70eec6488881c54307a924829e648b8abc9e8bc7 (patch)
tree2562afea20c1fd59f8a21b0cc2c37e0960fc3767 /utils
parentd72a08cef7cdd5dc1701378ef61657bcd4fee58e (diff)
downloadperl-70eec6488881c54307a924829e648b8abc9e8bc7.tar.gz
|| instead of "or" (perl#78708)
Diffstat (limited to 'utils')
-rw-r--r--utils/h2xs.PL2
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/h2xs.PL b/utils/h2xs.PL
index 6c41ea9cdd..ee4079f8ea 100644
--- a/utils/h2xs.PL
+++ b/utils/h2xs.PL
@@ -893,7 +893,7 @@ if( @path_h ){
}
else {
# Work from miniperl too - on "normal" systems
- my $SEEK_SET = eval 'use Fcntl qw/SEEK_SET/; SEEK_SET' or 0;
+ my $SEEK_SET = eval 'use Fcntl qw/SEEK_SET/; SEEK_SET' || 0;
seek CH, 0, $SEEK_SET;
my $src = do { local $/; <CH> };
close CH;