Subject: | POE-Filter-DHCPd-Lease 0.4 does not build |
POE-Filter-DHCPd-Lease does not passes tests:
1. Test::Pod and Test::Pod::Coverage does not exists in Makefile.PL.
2. 10-filter.t does not passes 'ends' test on systems with non-UTC locales.
Attached patch fix this probles.
Subject: | POE-Filter-DHCPd-Lease.patch |
diff -ru POE-Filter-DHCPd-Lease-0.04/META.yml POE-Filter-DHCPd-Lease-0.04_new/META.yml
--- POE-Filter-DHCPd-Lease-0.04/META.yml 2009-07-21 17:18:12.000000000 +0400
+++ POE-Filter-DHCPd-Lease-0.04_new/META.yml 2010-04-21 11:52:29.593789588 +0400
@@ -3,9 +3,14 @@
author:
- 'Jan Henning Thorsen, C<< <jhthorsen-at-cpan-org> >>'
build_requires:
+ ExtUtils::MakeMaker: 6.42
Test::More: 0
+ Test::Pod: 0
+ Test::Pod::Coverage: 0
+configure_requires:
+ ExtUtils::MakeMaker: 6.42
distribution_type: module
-generated_by: 'Module::Install version 0.77'
+generated_by: 'Module::Install version 0.92'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -16,7 +21,6 @@
- inc
- t
requires:
- DateTime: 0
POE::Filter: 0
resources:
license: http://dev.perl.org/licenses/
diff -ru POE-Filter-DHCPd-Lease-0.04/Makefile.PL POE-Filter-DHCPd-Lease-0.04_new/Makefile.PL
--- POE-Filter-DHCPd-Lease-0.04/Makefile.PL 2009-07-21 16:29:46.000000000 +0400
+++ POE-Filter-DHCPd-Lease-0.04_new/Makefile.PL 2010-04-21 11:53:52.806800739 +0400
@@ -4,8 +4,9 @@
all_from q(lib/POE/Filter/DHCPd/Lease.pm);
requires q(POE::Filter) => 0;
-requires q(DateTime) => 0;
test_requires q(Test::More) => 0;
+test_requires q(Test::Pod) => 0;
+test_requires q(Test::Pod::Coverage) => 0;
auto_install;
WriteAll;
diff -ru POE-Filter-DHCPd-Lease-0.04/t/10-filter.t POE-Filter-DHCPd-Lease-0.04_new/t/10-filter.t
--- POE-Filter-DHCPd-Lease-0.04/t/10-filter.t 2009-07-21 17:10:09.000000000 +0400
+++ POE-Filter-DHCPd-Lease-0.04_new/t/10-filter.t 2010-04-21 11:34:01.938648083 +0400
@@ -3,6 +3,7 @@
use strict;
use warnings;
use lib './lib';
+use Time::Local;
use POE::Filter::DHCPd::Lease;
use Test::More tests => 16;
@@ -12,7 +13,7 @@
for my $bufsize (16, 2048) {
my $ctrl = 100;
- my @ends = (1216057352, 1218858291);
+ my @ends = (timelocal(32,42,19,14,7-1,2008), timelocal(51,44,5,16,8-1,2008));
my @macs = qw/001133556611 aaff33552211/;
seek DATA, $datapos, 0;