oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixing bugs reported by tests

Browse source
This commit is contained in:
JT Smith 2007-07-29 21:26:35 +00:00
parent e07b63476c
commit 40a4c3c487
5 changed files with 9 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
t/Asset/AssetLineage.t
View file

@ -245,10 +245,10 @@ is(scalar @snippets, $folder->getChildCount, 'changing lineage does not change
is(1 , $folder2->getChildCount, 'changing lineage does not change relationship in folder2');
##Reinstance the asset object due to db manipulation
$folder = WebGUI::Asset->newByUrl($session, $folder->get('url'));
$folder2 = WebGUI::Asset->newByUrl($session, $folder2->get('url'));
@snippets = map { WebGUI::Asset->newByUrl($session, "snippet$_") } 0..6;
$snippet2 = WebGUI::Asset->newByUrl($session, $snippet2->get('url'));
$folder = WebGUI::Asset->newByDynamicClass($session, $folder->getId);
$folder2 = WebGUI::Asset->newByDynamicClass($session, $folder2->getId);
@snippets = map { WebGUI::Asset->newByDynamicClass($session, $snippets[$_]->getId) } 0..6;
$snippet2 = WebGUI::Asset->newByDynamicClass($session, $snippet2->getId);
####################################################
#

2
t/Asset/Snippet.t
View file

@ -37,6 +37,8 @@ my $properties = {
};
$snippet->update($properties);
use Data::Dumper;
Dumper($properties);
foreach my $property (keys %{$properties}) {
is ($snippet->get($property), $properties->{$property}, "updated $property is ".$properties->{$property});
}

2
t/Form/ProfileEnabled.t
View file

@ -40,7 +40,7 @@ $numTests = scalar @formTypes + 1;
plan tests => $numTests;
my @notEnabled = qw/Asset Button Captcha Checkbox Color Control List MimeType SubscriptionGroup Slider Submit User/;
my @notEnabled = qw/Asset Button Captcha Checkbox Color Control List MimeType SubscriptionGroup Slider Submit User Attachments/;
foreach my $formType (@formTypes) {
my $form = WebGUI::Form::DynamicField->new($session, fieldType => $formType);