1
0
mirror of synced 2026-03-09 20:01:38 +00:00

2007-10-25 12:27:49 by steve

Updated
This commit is contained in:
steve
2007-10-25 12:27:49 +00:00
parent d122f1141f
commit 8b01b135ec
3 changed files with 14 additions and 12 deletions

View File

@@ -1,10 +0,0 @@
#!/usr/bin/perl -I../lib -I./lib
use Test::More tests => 2;
BEGIN {
use_ok( 'Xen::Tools' );
use_ok( 'Xen::Tools::Log' );
}
diag( "Testing Xen::Tools $Xen::Tools::VERSION, Perl $], $^X" );

View File

@@ -7,7 +7,7 @@
# --
# http://www.steve.org.uk/
#
# $Id: modules.sh,v 1.1 2007-09-01 19:23:10 steve Exp $
# $Id: modules.sh,v 1.2 2007-10-25 12:27:49 steve Exp $
#
cat <<EOF
@@ -26,7 +26,7 @@ use Test::More qw( no_plan );
EOF
for i in `rgrep '^use ' .. | grep -v Expect | awk '{print $2}' | tr -d
for i in `rgrep '^use ' .. | grep -v Expect | grep -v Xen:: | grep -v Moose | awk '{print $2}' | tr -d
\;\(\) | sort | uniq`; \
do \
echo "BEGIN{ use_ok( '$i' ); }"; \

View File

@@ -10,6 +10,10 @@
use Test::More qw( no_plan );
BEGIN{ use_ok( 'Carp' ); }
require_ok( 'Carp' );
BEGIN{ use_ok( 'Config' ); }
require_ok( 'Config' );
@@ -38,6 +42,10 @@ BEGIN{ use_ok( 'File::Path' ); }
require_ok( 'File::Path' );
BEGIN{ use_ok( 'File::Spec' ); }
require_ok( 'File::Spec' );
BEGIN{ use_ok( 'File::Temp' ); }
require_ok( 'File::Temp' );
@@ -50,6 +58,10 @@ BEGIN{ use_ok( 'Pod::Usage' ); }
require_ok( 'Pod::Usage' );
BEGIN{ use_ok( 'POSIX' ); }
require_ok( 'POSIX' );
BEGIN{ use_ok( 'strict' ); }
require_ok( 'strict' );