tests/bozo/bos-man-t

   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 = 'bos';
  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/bozo";
  18
  19 #---------------------------------------------------------------------
  20
  21 # Keep track of number of tests we ran. We don't know up front.
  22 my $testcount = 0;
  23
  24 check_command_binary("$srcdir/$command");
  25 my $count = test_command_man_pages($builddir, "$srcdir/$command");
  26 done_testing($count);