mirror of
https://github.com/shlomif/PySolFC.git
synced 2025-04-05 00:02:29 -04:00
50 lines
1.3 KiB
Perl
50 lines
1.3 KiB
Perl
#!/usr/bin/perl
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use Test::More tests => 1;
|
|
use Test::Differences qw( eq_or_diff );
|
|
|
|
use String::ShellQuote qw/ shell_quote /;
|
|
|
|
my %skip =
|
|
(
|
|
map { $_ => 1 }
|
|
qw(
|
|
./pysollib/games/__init__.py
|
|
./pysollib/games/mahjongg/__init__.py
|
|
./pysollib/games/mahjongg/mahjongg1.py
|
|
./pysollib/games/mahjongg/mahjongg2.py
|
|
./pysollib/games/mahjongg/mahjongg3.py
|
|
./pysollib/games/special/__init__.py
|
|
./pysollib/games/ultra/__init__.py
|
|
./pysollib/pysoltk.py
|
|
./scripts/all_games.py
|
|
./pysollib/tile/ttk.py
|
|
)
|
|
);
|
|
|
|
# my $cmd = shell_quote( 'flake8', '.' );
|
|
my $cmd = shell_quote( 'flake8',
|
|
sort { $a cmp $b } grep { not exists $skip{$_} } glob('./*.py ./scripts/*.py ./tests/board_gen/*.py ./pysollib/*.py ./pysollib/*/{*/*.py,*.py}') );
|
|
|
|
# diag("<$cmd>");
|
|
|
|
# TEST
|
|
eq_or_diff( scalar(`$cmd`), '', "flake8 is happy with the code." );
|
|
|
|
__END__
|
|
|
|
=head1 COPYRIGHT AND LICENSE
|
|
|
|
This file is part of Freecell Solver. It is subject to the license terms in
|
|
the COPYING.txt file found in the top-level directory of this distribution
|
|
and at http://fc-solve.shlomifish.org/docs/distro/COPYING.html . No part of
|
|
Freecell Solver, including this file, may be copied, modified, propagated,
|
|
or distributed except according to the terms contained in the COPYING file.
|
|
|
|
Copyright (c) 2016 Shlomi Fish
|
|
|
|
=cut
|
|
|