Commit | Line | Data |
e60dc79f |
1 | use strict; |
2 | use Test::More; |
3 | |
4 | #---------------------------------------------------------------------- |
5 | # Test database failures |
6 | #---------------------------------------------------------------------- |
7 | |
8 | BEGIN { |
9 | eval "use DBIx::Class::CDBICompat;"; |
10 | if ($@) { |
11 | plan (skip_all => 'Class::Trigger and DBIx::ContextualFetch required'); |
12 | next; |
13 | } |
14 | eval "use DBD::SQLite"; |
15 | plan $@ ? (skip_all => 'needs DBD::SQLite for testing') : (tests => 2); |
16 | } |
17 | |
50891152 |
18 | use lib 't/cdbi/testlib'; |
e60dc79f |
19 | use Film; |
20 | |
21 | Film->create({ |
22 | title => "Bad Taste", |
23 | numexplodingsheep => 10, |
24 | }); |
25 | |
26 | Film->create({ |
27 | title => "Evil Alien Conquerers", |
28 | numexplodingsheep => 2, |
29 | }); |
30 | |
31 | is( Film->maximum_value_of("numexplodingsheep"), 10 ); |
32 | is( Film->minimum_value_of("numexplodingsheep"), 2 ); |