@@ -95,19 +95,13 @@ if ( $OSNAME eq 'MSWin32' ) {
95
95
$requires {' DateTime::TimeZone::Local::Win32' } = ' 1.64' ;
96
96
}
97
97
98
- if ( $OSNAME eq ' linux' ) {
99
- # This isn't strictly needed, but it is nice to have.
100
- # we use it to make sure jobqueue-workers exit when their parent exits.
101
- my @extra = qw( Linux::Pdeathsig) ;
102
-
103
- # for some reason, we need these on ubuntu.
104
- push @extra , qw(
105
- Linux::Pid
98
+ if ( $OSNAME eq ' linux' && -f ' /etc/debian_version' ) {
99
+ my @extra = qw(
106
100
Test::Pod::Coverage
107
101
Pod::Coverage::TrustPod
108
102
Test::CPAN::Meta
109
103
Test::Pod
110
- ) if -f ' /etc/debian_version ' ;
104
+ ) ;
111
105
$requires {$_ } = 0 for @extra ;
112
106
}
113
107
@@ -315,6 +309,22 @@ my %optional_features = (
315
309
},
316
310
},
317
311
},
312
+ linux_smaps => {
313
+ description => ' Linux::Smaps for limiting memory usage' ,
314
+ prereqs => {
315
+ runtime => {
316
+ requires => { ' Linux::Smaps' => ' 0' },
317
+ }
318
+ },
319
+ },
320
+ linux_pdeath => {
321
+ description => ' Linux::Pdeathsig for a good parent/child relationships' ,
322
+ prereqs => {
323
+ runtime => {
324
+ requires => { ' Linux::Pdeathsig' => 0 },
325
+ },
326
+ },
327
+ },
318
328
jobqueue => {
319
329
description => ' Mail Queueing' ,
320
330
prereqs => {
@@ -362,21 +372,7 @@ for my $file ( glob 'extensions/*/Config.pm' ) {
362
372
}
363
373
364
374
# BMO Customization
365
- my @bmo_features = grep {
366
- !m {
367
- ^
368
- (?: pg
369
- | oracle
370
- | mod_perl
371
- | sqlite
372
- | auth_ldap
373
- | auth_radius
374
- | smtp_auth
375
- | linux_pid
376
- | updates)
377
- $
378
- } mxs ;
379
- } keys %optional_features ;
375
+ my @bmo_features = grep { is_bmo_feature($_ ) } keys %optional_features ;
380
376
381
377
$optional_features {bmo } = {
382
378
description => ' features that bmo needs' ,
@@ -427,3 +423,19 @@ META.yml: Makefile.PL
427
423
MAKE
428
424
}
429
425
426
+ sub is_bmo_feature {
427
+ local $_ = shift ;
428
+ return 1 if $OSNAME eq ' linux' && / ^linux/ ;
429
+ return !m {
430
+ ^
431
+ (?: pg
432
+ | oracle
433
+ | mod_perl
434
+ | sqlite
435
+ | auth_ldap
436
+ | auth_radius
437
+ | smtp_auth
438
+ | updates)
439
+ $
440
+ } mxs ;
441
+ }
0 commit comments