X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F78self_referencial.t;h=fe89bce37fd355267118d65a3d2e4cca4eca4bf9;hb=e10d9d292bb2b14a31b45f36bd25b6610bd2e71d;hp=5759aca34e3d3679f73d5c056563e3d18454c091;hpb=d6915f449e2d68ac184d6bc616043fd605913757;p=dbsrgits%2FDBIx-Class.git diff --git a/t/78self_referencial.t b/t/78self_referencial.t index 5759aca..fe89bce 100644 --- a/t/78self_referencial.t +++ b/t/78self_referencial.t @@ -1,11 +1,13 @@ +BEGIN { do "./t/lib/ANFANG.pm" or die ( $@ || $! ) } + use strict; -use warnings; +use warnings; use Test::More; -use lib qw(t/lib); + use DBICTest; -my $schema = DBICTest::init_schema(); +my $schema = DBICTest->init_schema(); # this test will check to see if you can have 2 columns # in the same class pointing at the same other class