| Subject: | [PATCH] wrong return precedence |
returns binds stronger than or, so the expressions after or are ignored.
See https://rt.perl.org/rt3/Public/Bug/Display.html?id=59802
| Subject: | DOCSIS-ConfigFile-0.63-returnor.patch |
diff -bu ./lib/DOCSIS/ConfigFile/Decode.pm~ ./lib/DOCSIS/ConfigFile/Decode.pm
--- ./lib/DOCSIS/ConfigFile/Decode.pm~ 2011-10-03 14:54:16.000000000 -0500
+++ ./lib/DOCSIS/ConfigFile/Decode.pm 2013-07-25 08:21:47.953927842 -0500
@@ -306,7 +306,7 @@
=cut
sub ip {
- return inet_ntoa($_[0]) or confess 'inet_ntoa(...) failed to unpack binary string';
+ return inet_ntoa($_[0]) || confess 'inet_ntoa(...) failed to unpack binary string';
}
=head2 ether