Asset work related to class dispatch.

This commit is contained in:
Colin Kuskie 2010-01-04 10:59:48 -08:00
parent 1af2acbc9d
commit fde81306c6
2 changed files with 42 additions and 12 deletions

View file

@ -20,7 +20,7 @@ use Test::More;
use Test::Deep;
use Test::Exception;
plan tests => 20;
plan tests => 22;
my $session = WebGUI::Test->session;
@ -80,3 +80,21 @@ my $session = WebGUI::Test->session;
});
is $asset->menuTitle, 'menuTitle asset', '... set via constructor';
}
{
my $asset = WebGUI::Asset->new({
session => $session,
title => 'testing snippet',
className => 'WebGUI::Asset::Snippet',
});
isa_ok $asset, 'WebGUI::Asset';
use WebGUI::Asset::Snippet;
$asset = WebGUI::Asset::Snippet->new({
session => $session,
title => 'testing snippet',
});
isa_ok $asset, 'WebGUI::Asset::Snippet';
}