From e3322f732e5fe22d5972421d9a3087738aa7cab2 Mon Sep 17 00:00:00 2001 From: Galen Charlton Date: Thu, 11 Nov 2010 08:30:13 -0500 Subject: [PATCH] bug 5386: remove dep on Path::Class from t/00-load.t File::Spec is a core module, Path::Class isn't; not yet worth adding a new dependency. Also some minor whitepace cleanup. Signed-off-by: Galen Charlton Signed-off-by: Chris Cormack --- t/00-load.t | 19 +++++++++---------- 1 file changed, 9 insertions(+), 10 deletions(-) diff --git a/t/00-load.t b/t/00-load.t index 6b3172c2e4..b5c7181f87 100644 --- a/t/00-load.t +++ b/t/00-load.t @@ -3,23 +3,22 @@ use strict; use warnings; use Test::More; -use Path::Class; +use File::Spec; use File::Find; -my $lib = dir('C4')->absolute->resolve; +my $lib = File::Spec->rel2abs('C4'); find({ bydepth => 1, no_chdir => 1, wanted => sub { my $m = $_; - return unless $m =~ s/[.]pm$//; - return if $m =~ /Auth_with_ldap/; # Dont test this, it will fail on use - return if $m =~ /Cache/; # Cache modules are a WIP, add the tests back when we are using them more - return if $m =~ /SIP/; # SIP modules will not load clean - $m =~ s{^.*/C4/}{C4/}; - $m =~ s{/}{::}g; - use_ok($m) || BAIL_OUT("***** PROBLEMS LOADING FILE '$m'"); + return unless $m =~ s/[.]pm$//; + return if $m =~ /Auth_with_ldap/; # Dont test this, it will fail on use + return if $m =~ /Cache/; # Cache modules are a WIP, add the tests back when we are using them more + return if $m =~ /SIP/; # SIP modules will not load clean + $m =~ s{^.*/C4/}{C4/}; + $m =~ s{/}{::}g; + use_ok($m) || BAIL_OUT("***** PROBLEMS LOADING FILE '$m'"); }, }, $lib); done_testing(); - -- 2.39.5