1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
|
## no critic (Modules::ProhibitExcessMainComplexity)
use strict;
use warnings;
use Cwd qw( abs_path );
use Test::More;
BEGIN {
plan skip_all =>
'Must set DATETIME_FORMAT_STRPTIME_TEST_DEPS to true in order to run these tests'
unless $ENV{DATETIME_FORMAT_STRPTIME_TEST_DEPS};
}
use Test::DependentModules qw( test_all_dependents );
## no critic (Variables::RequireLocalizedPunctuationVars)
$ENV{PERL_TEST_DM_LOG_DIR} = abs_path('.');
## use critic
test_all_dependents(
'DateTime::Format::Strptime',
{
filter => sub {
return 0 if $_[0] =~ /^Mac-/;
return 0 if $_[0] eq 'App-dateseq';
return 0 if $_[0] eq 'App-financeta';
# Failing deps
return 0 if $_[0] eq 'App-Twimap';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Business-RO-CNP';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Catmandu-Fix-Date';
# Requires Coro
return 0 if $_[0] eq 'Cikl';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Data-Apache-mod_status';
# Requires a module which doesn't exist on CPAN
return 0 if $_[0] eq 'DPKG-Log';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Finance-TW-TAIFEX';
# Requires gtk
return 0 if $_[0] eq 'Gtk2-Ex-DbLinker';
# Fails regardless of Strptime
return 0 if $_[0] eq 'HTML-FormatData';
# Fails regardless of Strptime
return 0 if $_[0] eq 'HTML-Tested';
# Fails regardless of Strptime
return 0 if $_[0] eq 'meon-Web';
# prompts for keys to use in testing
return 0 if $_[0] eq 'Net-Amazon-AWIS';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Net-DRI';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Net-Plurk';
# Requires Coro
return 0 if $_[0] eq 'Net-IMAP-Server';
# Fails regardless of Strptime
return 0 if $_[0] eq 'OpenERP-OOM';
# hangs installing prereqs (probably SOAP::Lite)
return 0 if $_[0] eq 'Plagger';
# Fails regardless of Strptime
return 0 if $_[0] eq 'SmokeRunner-Multi';
# Fails on installing some prereqs
return 0 if $_[0] eq 'OpenResty';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Smolder';
# Is either hanging or installing all of CPAN
return 0 if $_[0] eq 'Strehler';
# Fails regardless of Strptime
return 0 if $_[0] eq 'Video-PlaybackMachine';
# Fails regardless of Strptime
return 0 if $_[0] eq 'WebService-IMDB';
# Fails regardless of Strptime
return 0 if $_[0] eq 'W3C-SOAP';
# Fails regardless of Strptime
return 0 if $_[0] eq 'WWW-DataWiki';
# Requires Wx
return 0 if $_[0] eq 'Wx-Perl-DbLinker';
# Fails on installing some prereqs
return 0 if $_[0] eq 'XAS';
return 1;
},
},
);
done_testing();
|
