t/cdbi/max_min_value_of.t

   1 use DBIx::Class::Optional::Dependencies -skip_all_without => 'cdbicompat';
   2
   3 use strict;
   4 use warnings;
   5
   6 use Test::More;
   7
   8 #----------------------------------------------------------------------
   9 # Test database failures
  10 #----------------------------------------------------------------------
  11
  12 use lib 't/cdbi/testlib';
  13 use Film;
  14
  15 Film->create({
  16     title => "Bad Taste",
  17     numexplodingsheep => 10,
  18 });
  19
  20 Film->create({
  21     title => "Evil Alien Conquerers",
  22     numexplodingsheep => 2,
  23 });
  24
  25 is( Film->maximum_value_of("numexplodingsheep"), 10 );
  26 is( Film->minimum_value_of("numexplodingsheep"), 2  );
  27
  28 done_testing;