The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
use strict;
use warnings;

use Test::More;

use lib 'lib';

BEGIN {
	eval { require Lingua::Ispell };
	if ($@){
		eval { 
			require Text::Aspell;
			my $o = Text::Aspell->new;
			$o->check('house');
			die $o->errstr if $o->errstr;
		};
	}
	if ($@){
		plan skip_all => 'requires Lingua::Ispell or Text::Aspell' ; 
	}
}

eval {
	use Test::Pod::Spelling;
};

is( $@, '', 'use_ok' );

eval {
	add_stopwords(qw(
		Goddard LICENCE inline behaviour spelt TODO API
	));
};
is( $@, '', 'add_stopwords inline' );

my $rv = eval { pod_file_spelling_ok( 't/good.pod' ) };
is( $@, '', 'no errors');
is( $rv, 0, 'good.pod' );


done_testing( 5 );