X-Git-Url: http://git.openafs.org/?p=openafs.git;a=blobdiff_plain;f=tests%2Fvenus%2Ffs-man-t;h=952b6bb970433c8ddf58489e967b3dcacc1df63b;hp=3267b5ddd8c1d26c4b8d55b29d0383d2da0f68cb;hb=1bd03c9c22ca7f36b9f1647c258b5f18c8ac92c0;hpb=04605389d7ac89c32e4b2576d4894b4da94d3a24

diff --git a/tests/venus/fs-man-t b/tests/venus/fs-man-t
index 3267b5d..952b6bb 100755
--- a/tests/venus/fs-man-t
+++ b/tests/venus/fs-man-t
@@ -1,25 +1,8 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;
-use File::Basename;
-use lib "./tests-lib/perl5";
+use lib $ENV{SOURCE} . "/tests-lib/perl5";
 use mancheck_utils;
 
-# Set this to the bare command to test
-my $command = 'fs';
-my $builddir = $ENV{BUILD};
-if (!$builddir) {
-    $builddir = dirname($0) . "/..";
-}
-$builddir .= "/..";
-# Set this to the directory holding $command
-my $srcdir = "$builddir/src/venus";
-
-#---------------------------------------------------------------------
-
-my @sub_commands = lookup_sub_commands($srcdir, $command);
-plan tests => scalar @sub_commands;
-
-test_command_man_pages($builddir, $command, @sub_commands);
-
+run_manpage_tests("src/venus", "fs");