From: Peter Rabbitson <ribasushi@cpan.org>
Date: Thu, 8 Jul 2010 12:25:42 +0000 (+0200)
Subject: The support structure for this was deleted in 2006
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8b6b29697587f3a64a000c65486b3a648e99b34f;p=dbsrgits%2FDBIx-Class-Historic.git

The support structure for this was deleted in 2006
---

diff --git a/maint/gen-tests.pl b/maint/gen-tests.pl
deleted file mode 100755
index 48e71a7..0000000
--- a/maint/gen-tests.pl
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/bin/perl
-
-die "must be run from DBIx::Class root dir" unless -d 't/run';
-
-gen_tests($_) for qw/BasicRels HelperRels/;
-
-sub gen_tests {
-    my $variant = shift;
-    my $dir = lc $variant;
-    system("rm -f t/$dir/*.t");
-    
-    foreach my $test (map { m[^t/run/(.+)\.tl$]; $1 } split(/\n/, `ls t/run/*.tl`)) {
-        open(my $fh, '>', "t/$dir/${test}.t") or die $!;
-        print $fh <<"EOF";
-use Test::More;
-use lib qw(t/lib);
-use DBICTest;
-use DBICTest::$variant;
-
-require "t/run/${test}.tl";
-run_tests(DBICTest->schema);
-EOF
-    close $fh;
-    }
-}