diff --git a/t/08-errors.t b/t/08-errors.t
index a92ca4d..884b96f 100644
--- a/t/08-errors.t
+++ b/t/08-errors.t
@@ -37,8 +37,10 @@ SKIP: {
 
    is $R->run(q`a <- 1;`), '';
 
-   use_ok 't::FlawedStatisticsR';
-   ok $R = t::FlawedStatisticsR->new();
+   use FindBin;
+   use lib $FindBin::Bin;
+   use_ok 'FlawedStatisticsR';
+   ok $R = FlawedStatisticsR->new();
    eval {
       $R->run( qq`print("Hello");\ncolors<-c("red")` );
    };
diff --git a/t/FlawedStatisticsR.pm b/t/FlawedStatisticsR.pm
index 4977250..2ca4a46 100644
--- a/t/FlawedStatisticsR.pm
+++ b/t/FlawedStatisticsR.pm
@@ -1,4 +1,4 @@
-package t::FlawedStatisticsR;
+package FlawedStatisticsR;
 
 use Statistics::R;
 use base qw(Statistics::R);