# $Id: pod.t,v 1.2 2003/02/20 17:12:46 kellan Exp $
BEGIN {
use File::Find;
@files = ();
find(sub { push @files, $File::Find::name if $_ =~ m/\.pm$/;},
('blib/lib')
);
}
use Test::More;
eval "require Test::Pod";
if ($@) {
plan skip_all => "Test::Pod is missing";
}
else {
tests => scalar @files;
}
foreach my $file ( @files ) {
pod_ok( $file );
}