#!/usr/bin/perl
#$Id: pod_coverage.t,v 1.1 2005/03/24 22:23:38 simonflack Exp $
use Test::More;
eval "use Test::Pod::Coverage 1.00";
plan skip_all => "Test::Pod::Coverage 1.00 required for testing pod coverage" if $@;
all_pod_coverage_ok({also_private => [qr/^TRACE(?:F|_HERE)?|DUMP$/]});


syntax highlighted by Code2HTML, v. 0.9.1