File: 98_pod_coverage.t

package info (click to toggle)
libunicode-maputf8-perl 1.11-2
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k, lenny, squeeze, wheezy
  • size: 156 kB
  • ctags: 19
  • sloc: perl: 603; makefile: 38
file content (22 lines) | stat: -rw-r--r-- 579 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
use strict;

use lib  ('./blib','../blib', './lib', '../lib');

eval {
    require Test::More;
};
if ($@) {
    $|++;
    print "1..0 # Skipped: Test::More required for testing POD coverage\n";
    exit;
}
eval {
    require Test::Pod::Coverage;
};
if ($@ or (not defined $Test::Pod::Coverage::VERSION) or ($Test::Pod::Coverage::VERSION < 1.06)) {
    Test::More::plan (skip_all => "Test::Pod::Coverage 1.06 required for testing POD coverage");
    exit;
}

Test::More::plan (tests => 1);
Test::Pod::Coverage::pod_coverage_ok( 'Unicode::MapUTF8', { also_private => ['DEBUG'] });