diff options
Diffstat (limited to 'rt/t/api/squish.t')
-rw-r--r-- | rt/t/api/squish.t | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/rt/t/api/squish.t b/rt/t/api/squish.t index 59615368f..4b0fc5f37 100644 --- a/rt/t/api/squish.t +++ b/rt/t/api/squish.t @@ -1,11 +1,16 @@ use strict; use warnings; use RT; -use RT::Test nodb => 1, tests => 7; +use RT::Test nodb => 1, tests => undef; +use Test::Warn; use RT::Squish; -my $squish = RT::Squish->new(); +my $squish; +warning_like { + $squish = RT::Squish->new(); +} [qr/implement/], "warns this is only an abstract base class"; + for my $method ( qw/Content ModifiedTime ModifiedTimeString Key/ ) { can_ok($squish, $method); } @@ -14,3 +19,5 @@ ok( (time()-$squish->ModifiedTime) <= 2, 'ModifiedTime' ); use RT::Squish::CSS; can_ok('RT::Squish::CSS', 'Style'); + +done_testing; |