4 use RT::Test nodb => 1, tests => undef;
11 $squish = RT::Squish->new();
12 } [qr/implement/], "warns this is only an abstract base class";
14 for my $method ( qw/Content ModifiedTime ModifiedTimeString Key/ ) {
15 can_ok($squish, $method);
17 like( $squish->Key, qr/[a-f0-9]{32}/, 'Key is like md5' );
18 ok( (time()-$squish->ModifiedTime) <= 2, 'ModifiedTime' );
21 can_ok('RT::Squish::CSS', 'Style');