File: 30dbicplain.t

package info (click to toggle)
libdbix-class-perl 0.07003-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 1,396 kB
  • ctags: 764
  • sloc: perl: 7,046; sql: 217; makefile: 43
file content (12 lines) | stat: -rw-r--r-- 196 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
 
#!/usr/bin/perl

use strict;
use warnings;
use Test::More;

use lib qw(t/lib);
use DBICTest::Plain;

plan tests => 1;

cmp_ok(DBICTest::Plain->resultset('Test')->count, '>', 0, 'count is valid');