<commit_before>#!perl
# Copyright (C) 2001-2005, The Perl Foundation.
# $Id$

use strict;
use warnings;

use lib qw( lib );

use Test::More;
use File::Find;

=head1 NAME

t/configure/036-config_steps.t - tests step modules under the config dir

=head1 SYNOPSIS

    prove t/configure/036-config_steps.t

=head1 DESCRIPTION

Regressions tests for configure steps that live under the config directory.

=cut

my @steps;
sub wanted { $File::Find::name =~ m{^config\/(.*)\.pm\z}s &&
    do {
        my $mod = $1;
        my $class = join '::', ( split /\//, $mod );
        push @steps, $class;
    };
}
find( { wanted => \&wanted }, 'config' );

if ( $^O !~ /win32/i ) {
    @steps = grep { $_ !~ /win32/i } @steps;
}

my $testcount = @steps + 2;
plan tests => $testcount;
unshift @INC, 'config';

foreach my $step (@steps) {
    require_ok($step);
}

pass("Keep Devel::Cover happy");
pass("Completed all tests in $0");

# Local Variables:
#   mode: cperl
#   cperl-indent-level: 4
#   fill-column: 100
# End:
# vim: expandtab shiftwidth=4:<commit_msg>Temporary fix for problem reported in http://rt.perl.org/rt3/Ticket/Display.html?id=57826.  Try to require only the top-level of configuration step classes, not those farther down that are OS-specific.<commit_after>#!perl
# Copyright (C) 2001-2005, The Perl Foundation.
# $Id$

use strict;
use warnings;

use lib qw( lib );

use Test::More;
use File::Find;

=head1 NAME

t/configure/036-config_steps.t - tests step modules under the config dir

=head1 SYNOPSIS

    prove t/configure/036-config_steps.t

=head1 DESCRIPTION

Regressions tests for configure steps that live under the config directory.

=cut

my @steps;
sub wanted { $File::Find::name =~
    m{^config\/(init|inter|auto|gen)\/(\w+)\.pm} &&
    do {
        my $class = join '::', ( $1, $2 );
        push @steps, $class;
    };
}
find( { wanted => \&wanted }, 'config' );

if ( $^O !~ /win32/i ) {
    @steps = grep { $_ !~ /win32/i } @steps;
}

my $testcount = @steps + 2;
plan tests => $testcount;
unshift @INC, 'config';

foreach my $step (@steps) {
    require_ok($step);
}

pass("Keep Devel::Cover happy");
pass("Completed all tests in $0");

# Local Variables:
#   mode: cperl
#   cperl-indent-level: 4
#   fill-column: 100
# End:
# vim: expandtab shiftwidth=4:
{'fraction_non_alphanumeric': 0.16264796142042964, 'fraction_numerical': 0.028496273564226217, 'mean_word_length': 3.380038387715931, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 7, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '793907', 'n_tokens_mistral': 889, 'n_tokens_neox': 818, 'n_words': 243}