Write a test to make sure Group->new returns undef for non-existant groupIds.

This commit is contained in:
Colin Kuskie 2011-04-01 15:13:16 -07:00
parent 5c175c42d9
commit 8f687d8aa5

View file

@ -93,7 +93,7 @@ my @ldapTests = (
);
plan tests => (172 + (scalar(@scratchTests) * 2) + scalar(@ipTests)); # increment this value for each test you create
plan tests => (173 + (scalar(@scratchTests) * 2) + scalar(@ipTests)); # increment this value for each test you create
my $session = WebGUI::Test->session;
my $testCache = WebGUI::Cache->new($session, 'myTestKey');
@ -124,6 +124,8 @@ foreach my $gid ('new', '') {
$g->delete;
}
is(WebGUI::Group->new($session, 'neverAGroupId'), undef, 'calling new with a non-existant groupId returns undef');
my $g = WebGUI::Group->new($session, "new");
$g->description('I am really a montage');