#!/usr/bin/perl -w

# vim: set filetype=perl :

# some code here borrowed from brian d foy's Mac::PropertyList's
# t/pod.t

use strict;

my %pods;

BEGIN {
    use Pod::Find qw(pod_find);

    %pods = pod_find(
        { 
            -verbose => 1, 
        },
        'blib'
    );
}

use Test::Pod tests => scalar keys %pods;

for my $pod (keys %pods) {
    pod_ok($pod);
}