source: web/old/remctl-2.14/tests/docs/pod-t @ f6f3e91

web
Last change on this file since f6f3e91 was f6f3e91, checked in by Jessica B. Hamrick <jhamrick@…>, 15 years ago

Preserve directory hierarchy (not sure what happened to it)

  • Property mode set to 100755
File size: 443 bytes
Line 
1#! /usr/bin/perl
2#
3# Test suite for the remctl POD documentation.  This script is taken almost
4# verbatim from the Test::Pod manual page.
5
6use strict;
7use Test::More;
8eval "use Test::Pod 1.00";
9plan skip_all => "Test::Pod 1.00 required for testing POD" if $@;
10my $srcdir = "$ENV{SOURCE}";
11$srcdir =~ s,[^/]+/*$,,;
12chdir "$srcdir" or die "$0: cannot chdir to $srcdir: $!\n";
13my @poddirs = qw(docs);
14all_pod_files_ok (all_pod_files (@poddirs));
Note: See TracBrowser for help on using the repository browser.