more treelike tests

[dbsrgits/DBIx-Class.git] / t / 87ordered.t

diff --git a/t/87ordered.t b/t/87ordered.t
index 7a4847e..b1d484c 100644 (file)
--- a/t/87ordered.t
+++ b/t/87ordered.t
@@ -6,7 +6,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 321;
 
@@ -42,6 +42,7 @@ sub hammer_rs {
     my $employee;
     my $count = $rs->count();
     my $position_column = $rs->result_class->position_column();
+    my $row;
 
     foreach my $position (1..$count) {