Add a test for get.

This commit is contained in:
Colin Kuskie 2009-12-29 12:05:23 -08:00
parent d7a31ea901
commit cb0ca14958

View file

@ -20,7 +20,7 @@ use Test::More;
use Test::Deep;
use Test::Exception;
plan tests => 16;
plan tests => 17;
my $session = WebGUI::Test->session;
@ -44,6 +44,8 @@ my $session = WebGUI::Test->session;
$asset->title('<h1></h1>');
is $asset->title, 'Untitled', '... if HTML filters out all, returns default';
is $asset->get('title'), $asset->title, '... get(title) works';
is $asset->menuTitle, 'Untitled', 'menuTitle: default is untitled';
}