X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fresultset%2Fis_ordered.t;h=a18345844967f61f5dc360e95eb9688ed3591925;hb=c0329273268971824784f239f32c7246e68da9c5;hp=bab58d0ec528fdb35177639509a49f05bbfb9bef;hpb=d1f542dbc28d54536e6544b996ace7454f681f0e;p=dbsrgits%2FDBIx-Class.git

diff --git a/t/resultset/is_ordered.t b/t/resultset/is_ordered.t
index bab58d0..a183458 100644
--- a/t/resultset/is_ordered.t
+++ b/t/resultset/is_ordered.t
@@ -1,9 +1,10 @@
+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+
 use strict;
 use warnings;
 
-use lib qw(t/lib);
+
 use Test::More;
-use Test::Exception;
 use DBICTest;
 
 my $schema = DBICTest->init_schema();
@@ -37,11 +38,11 @@ ok !$rs->is_ordered, 'vanilla resultset is not ordered';
 
 # More complicated ordering
 {
-  my $ordered = $rs->search(undef, { 
+  my $ordered = $rs->search(undef, {
     order_by => [
-      { -asc => 'artistid' }, 
+      { -asc => 'artistid' },
       { -desc => 'name' },
-    ] 
+    ]
   });
   ok $ordered->is_ordered, 'more complicated resultset ordering is_ordered';
 }