Commit | Line | Data |
e60dc79f |
1 | use strict; |
2 | use Test::More; |
3 | |
4 | #---------------------------------------------------------------------- |
5 | # Test database failures |
6 | #---------------------------------------------------------------------- |
7 | |
50891152 |
8 | use lib 't/cdbi/testlib'; |
e60dc79f |
9 | use Film; |
10 | |
11 | Film->create({ |
12 | title => "Bad Taste", |
13 | numexplodingsheep => 10, |
14 | }); |
15 | |
16 | Film->create({ |
17 | title => "Evil Alien Conquerers", |
18 | numexplodingsheep => 2, |
19 | }); |
20 | |
21 | is( Film->maximum_value_of("numexplodingsheep"), 10 ); |
22 | is( Film->minimum_value_of("numexplodingsheep"), 2 ); |
d9bd5195 |
23 | |
24 | done_testing; |