aboutsummaryrefslogtreecommitdiffstats
path: root/t/lib/RTest/TestDB.pm
diff options
context:
space:
mode:
Diffstat (limited to 't/lib/RTest/TestDB.pm')
-rw-r--r--t/lib/RTest/TestDB.pm29
1 files changed, 29 insertions, 0 deletions
diff --git a/t/lib/RTest/TestDB.pm b/t/lib/RTest/TestDB.pm
new file mode 100644
index 0000000..25012d2
--- /dev/null
+++ b/t/lib/RTest/TestDB.pm
@@ -0,0 +1,29 @@
+package # hide from PAUSE
+ RTest::TestDB;
+
+use base qw/DBIx::Class::Schema/;
+
+use DateTime;
+
+__PACKAGE__->load_classes;
+
+sub setup_test_data {
+ my $self = shift;
+ $self->populate('Foo' => [
+ [ qw/ first_name last_name / ],
+ map { (
+ [ "Joe", "Bloggs $_" ],
+ [ "John", "Smith $_" ],
+ ) } (1 .. 50)
+ ]);
+ $self->populate('Baz' => [
+ [ qw/ name / ],
+ map { [ "Baz $_" ] } (1 .. 4)
+ ]);
+ $self->populate('Bar' => [
+ [ qw/ name foo_id / ],
+ map { [ "Bar $_", $_ ] } (1 .. 4)
+ ]);
+}
+
+1;