libcryptx-perl/t/004_all_pm_pod_spelling.t

33 lines
1.3 KiB
Perl
Raw Normal View History

2018-03-22 15:54:03 +01:00
use strict;
use warnings;
use Test::More;
plan skip_all => "set TEST_POD to enable this test (developer only!)" unless $ENV{TEST_POD};
plan skip_all => "File::Find not installed" unless eval { require File::Find };
plan skip_all => "Test::Pod::Spelling or Text::Aspell not installed" unless eval { require Test::Pod::Spelling; require Text::Aspell; };
Test::Pod::Spelling->import(
spelling => {
allow_words => [qw(
ASN AES BLAKEb BLAKEs CPAN CRC ChaCha CryptX DCIT DER Diffie EAX ECCDH ECDH ECDSA Flickr HKDF JSON JWA JWK
Karel Miko OCB OCBv OID OMAC OO OpenSSL PBKDF PEM PKCS RIPEMD Rijndael SHA UUID RFC
decrypt decrypts interoperability cryptographically cryptographic octects
libtomcrypt libtommath
params paramshash irand perl endian zbase bumac bmac budigest bdigest md de
blakes_ blakeb_
XOR'ing XOR'ed
keccak
)]
},
);
plan tests => 107;
my @files;
File::Find::find({ wanted=>sub { push @files, $_ if /\.pm$/ }, no_chdir=>1 }, 'lib');
for my $m (sort @files) {
Test::Pod::Spelling::pod_file_spelling_ok( $m, "Spelling in '$m'" );
}