X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=t%2F1-config.t;h=5cad917bebf3084808099604210016185b096868;hb=6d4f4e4344ff7f46057a759a337a6bc61127ae8e;hp=dae78d5e7b1eb37f54e9dc6d89dea3b32963e656;hpb=be87c666c2154c7f064090ac409836d2f1d4afd3;p=webpac2 diff --git a/t/1-config.t b/t/1-config.t index dae78d5..5cad917 100755 --- a/t/1-config.t +++ b/t/1-config.t @@ -1,22 +1,15 @@ #!/usr/bin/perl -w use strict; -use Test::More tests => 28; -use Test::Exception; use blib; -use Data::Dump qw/dump/; -use Cwd qw/abs_path/; +use Test::More tests => 28; BEGIN { +use_ok( 'WebPAC::Test' ); use_ok( 'WebPAC::Config' ); } -my $debug = shift @ARGV; - -ok(my $abs_path = abs_path($0), "abs_path"); -$abs_path =~ s#/[^/]*$#/#; - my $path = "$abs_path/conf/test.yml"; ok(my $config = new WebPAC::Config( path => $path ), "new");