avoid FindBin in some tests

[catagits/Catalyst-Devel.git] / t / back_compat.t

diff --git a/t/back_compat.t b/t/back_compat.t
index 6c93eb3..f1cd584 100644 (file)
--- a/t/back_compat.t
+++ b/t/back_compat.t
@@ -1,13 +1,11 @@
 use strict;
 use warnings;
-use FindBin qw/$Bin/;
 use File::Temp qw/tempfile/;
-use lib "$Bin/lib";
-use Data::Dumper;
+use lib "t/lib";
 
 use MyTestHelper;
 
-use Test::More tests => 3;
+use Test::More;
 
 my $helper = bless {}, 'MyTestHelper';
 
@@ -26,7 +24,7 @@ package MyTestHelper;
 use Test::More;
 use File::Temp qw/tempfile/;
 
-my ($fh, $fn) = tempfile;
+my ($fh, $fn) = tempfile( UNLINK => 1 );
 close $fh;
 $helper->render_file('example1',  $fn, { test_var => 'test_val' });
 open $fh, $fn or die $@;
@@ -38,3 +36,4 @@ my $contents;
 }
 is $contents, "foobartest_val\n";
 
+done_testing;