view tests/pod.t @ 300:b593b701d057

Added tag release-3.4 for changeset eba6872a5309
author Steve Kemp <steve@steve.org.uk>
date Wed, 10 Dec 2008 20:35:34 +0000
parents bc8961a81af6
children
line wrap: on
line source

#!/usr/bin/perl -w

#
#  Test that the POD we use in our modules is valid.
#


use strict;
use Test::More;
eval "use Test::Pod 1.00";
plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;

#
#  Run the test(s).
#
my @poddirs = qw( bin );
all_pod_files_ok( all_pod_files( @poddirs ) );