Correct mistake in t/00describe_environment.t reporting of _TempExtlib

[dbsrgits/DBIx-Class.git] / t / multi_create / in_memory.t

diff --git a/t/multi_create/in_memory.t b/t/multi_create/in_memory.t
index 25d290a..c96db68 100644 (file)
--- a/t/multi_create/in_memory.t
+++ b/t/multi_create/in_memory.t
@@ -1,9 +1,11 @@
+BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) }
+
 use strict;
 use warnings;
 
 use Test::More;
 use Test::Exception;
-use lib qw(t/lib);
+
 use DBICTest;
 
 my $schema = DBICTest->init_schema();
@@ -75,7 +77,7 @@ my $schema = DBICTest->init_schema();
 # test both sides of a 1:(1|0)
 {
   for my $reldir ('might_have', 'belongs_to') {
-    my $artist = $schema->resultset('Artist')->next;
+    my $artist = $schema->resultset('Artist')->find(1);
 
     my $new_track = $schema->resultset('Track')->new ({
       title => "$reldir: First track of latest cd",