[hcoop/debian/openafs.git] / tests / bucoord / backup-man-t

#!/usr/bin/perl

use strict;
use warnings;
use File::Basename;
use lib "./tests-lib/perl5";
use mancheck_utils;

# Set this to the bare command to test
my $command = 'backup';
my $builddir = $ENV{BUILD};
if (!$builddir) {
    $builddir = dirname($0) . "/..";
}
$builddir .= "/..";
# Set this to the directory holding $command
my $srcdir = "$builddir/src/bucoord";

#---------------------------------------------------------------------

my @sub_commands = lookup_sub_commands($srcdir, $command);
plan tests => scalar @sub_commands;

test_command_man_pages($builddir, $command, @sub_commands);
Commit	Line	Data
805e021f CE	1	#!/usr/bin/perl
	2
	3	use strict;
	4	use warnings;
	5	use File::Basename;
	6	use lib "./tests-lib/perl5";
	7	use mancheck_utils;
	8
	9	# Set this to the bare command to test
	10	my $command = 'backup';
	11	my $builddir = $ENV{BUILD};
	12	if (!$builddir) {
	13	$builddir = dirname($0) . "/..";
	14	}
	15	$builddir .= "/..";
	16	# Set this to the directory holding $command
	17	my $srcdir = "$builddir/src/bucoord";
	18
	19	#---------------------------------------------------------------------
	20
	21	my @sub_commands = lookup_sub_commands($srcdir, $command);
	22	plan tests => scalar @sub_commands;
	23
	24	test_command_man_pages($builddir, $command, @sub_commands);
	25