INN commit: branches/2.6 (6 files)
INN Commit
rra at isc.org
Sat Oct 8 20:37:37 UTC 2016
Date: Saturday, October 8, 2016 @ 13:37:36
Author: iulius
Revision: 10076
Fix Perl warning when Sys::Syslog version is not numeric
Change "<" to "lt" to avoid the following warning:
Argument "0.33_01" isn't numeric in numeric lt (<)
Modified:
branches/2.6/backends/news2mail.in
branches/2.6/backends/send-uucp.in
branches/2.6/control/controlchan.in
branches/2.6/control/perl-nocem.in
branches/2.6/frontends/cnfsstat.in
branches/2.6/frontends/mailpost.in
------------------------+
backends/news2mail.in | 2 +-
backends/send-uucp.in | 2 +-
control/controlchan.in | 2 +-
control/perl-nocem.in | 2 +-
frontends/cnfsstat.in | 2 +-
frontends/mailpost.in | 2 +-
6 files changed, 6 insertions(+), 6 deletions(-)
Modified: backends/news2mail.in
===================================================================
--- backends/news2mail.in 2016-10-08 20:37:08 UTC (rev 10075)
+++ backends/news2mail.in 2016-10-08 20:37:36 UTC (rev 10076)
@@ -46,7 +46,7 @@
eval { require Sys::Syslog; import Sys::Syslog; $use_syslog = 1; };
if ($use_syslog) {
- if ($Sys::Syslog::VERSION < 0.15) {
+ if ($Sys::Syslog::VERSION lt 0.15) {
eval "sub Sys::Syslog::_PATH_LOG { '/dev/log' }" if $^O eq 'dec_osf';
Sys::Syslog::setlogsock('unix') if $^O =~ /linux|dec_osf|freebsd|darwin/;
}
Modified: backends/send-uucp.in
===================================================================
--- backends/send-uucp.in 2016-10-08 20:37:08 UTC (rev 10075)
+++ backends/send-uucp.in 2016-10-08 20:37:36 UTC (rev 10076)
@@ -53,7 +53,7 @@
eval { require Sys::Syslog; import Sys::Syslog; $use_syslog = 1; };
if ($use_syslog) {
- if ($Sys::Syslog::VERSION < 0.15) {
+ if ($Sys::Syslog::VERSION lt 0.15) {
eval "sub Sys::Syslog::_PATH_LOG { '/dev/log' }" if $^O eq 'dec_osf';
Sys::Syslog::setlogsock('unix') if $^O =~ /linux|dec_osf|freebsd|darwin/;
}
Modified: control/controlchan.in
===================================================================
--- control/controlchan.in 2016-10-08 20:37:08 UTC (rev 10075)
+++ control/controlchan.in 2016-10-08 20:37:36 UTC (rev 10076)
@@ -70,7 +70,7 @@
}
if ($use_syslog) {
- if ($Sys::Syslog::VERSION < 0.15) {
+ if ($Sys::Syslog::VERSION lt 0.15) {
eval "sub Sys::Syslog::_PATH_LOG { '/dev/log' }" if $^O eq 'dec_osf';
Sys::Syslog::setlogsock('unix') if $^O =~ /linux|dec_osf|freebsd|darwin/;
}
Modified: control/perl-nocem.in
===================================================================
--- control/perl-nocem.in 2016-10-08 20:37:08 UTC (rev 10075)
+++ control/perl-nocem.in 2016-10-08 20:37:36 UTC (rev 10076)
@@ -56,7 +56,7 @@
eval { require Sys::Syslog; import Sys::Syslog; $use_syslog = 1; };
if ($use_syslog) {
- if ($Sys::Syslog::VERSION < 0.15) {
+ if ($Sys::Syslog::VERSION lt 0.15) {
eval "sub Sys::Syslog::_PATH_LOG { '/dev/log' }" if $^O eq 'dec_osf';
Sys::Syslog::setlogsock('unix') if $^O =~ /linux|dec_osf|freebsd|darwin/;
}
Modified: frontends/cnfsstat.in
===================================================================
--- frontends/cnfsstat.in 2016-10-08 20:37:08 UTC (rev 10075)
+++ frontends/cnfsstat.in 2016-10-08 20:37:36 UTC (rev 10076)
@@ -64,7 +64,7 @@
if ($opt{'s'}) {
eval { require Sys::Syslog; import Sys::Syslog; $use_syslog = 1 };
if ($use_syslog) {
- if ($Sys::Syslog::VERSION < 0.15) {
+ if ($Sys::Syslog::VERSION lt 0.15) {
eval "sub Sys::Syslog::_PATH_LOG { '/dev/log' }" if $^O eq 'dec_osf';
Sys::Syslog::setlogsock('unix') if $^O =~ /linux|dec_osf|freebsd|darwin/;
}
Modified: frontends/mailpost.in
===================================================================
--- frontends/mailpost.in 2016-10-08 20:37:08 UTC (rev 10075)
+++ frontends/mailpost.in 2016-10-08 20:37:36 UTC (rev 10076)
@@ -45,7 +45,7 @@
eval { require Sys::Syslog; import Sys::Syslog; $use_syslog = 1; };
if ($use_syslog) {
- if ($Sys::Syslog::VERSION < 0.15) {
+ if ($Sys::Syslog::VERSION lt 0.15) {
eval "sub Sys::Syslog::_PATH_LOG { '/dev/log' }" if $^O eq 'dec_osf';
Sys::Syslog::setlogsock('unix') if $^O =~ /linux|dec_osf|freebsd|darwin/;
}
More information about the inn-committers
mailing list