#!/usr/local/bin/perl -w =head1 NAME 00utils.t - testing of VCP::Utils::cvs =cut use strict ; use Carp ; use Cwd; use Test ; use VCP::Utils qw( start_dir ); my @tests = ( sub { ok start_dir, cwd }, ) ; plan tests => scalar( @tests ) ; $_->() for @tests ;
# | Change | User | Description | Committed | |
---|---|---|---|---|---|
#2 | 2727 | John Fetkovich | more profiling capability added. | ||
#1 | 2701 | Barrie Slaymaker | Add support for start_dir |