tests: Run perl via 'env'

[openafs.git] / tests / bozo / bos-man-t

diff --git a/tests/bozo/bos-man-t b/tests/bozo/bos-man-t
index 73facd2..cfdc809 100755 (executable)
--- a/tests/bozo/bos-man-t
+++ b/tests/bozo/bos-man-t
@@ -1,26 +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 = 'bos';
-my $builddir = $ENV{BUILD};
-if (!$builddir) {
-    $builddir = dirname($0) . "/..";
-}
-$builddir .= "/..";
-# Set this to the directory holding $command
-my $srcdir = "$builddir/src/bozo";
-
-#---------------------------------------------------------------------
-
-# Keep track of number of tests we ran. We don't know up front.
-my $testcount = 0;
-
-check_command_binary("$srcdir/$command");
-my $count = test_command_man_pages($builddir, "$srcdir/$command");
-done_testing($count);
+run_manpage_tests("src/bozo", "bos");