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

fix package import and upgrade tests, add sql upgrade tests

Browse source
This commit is contained in:
Graham Knop 2010-03-20 13:42:56 -05:00
parent 94baba20fc
commit 577b804325
5 changed files with 44 additions and 19 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/AssetPackage.pm
View file

@ -161,6 +161,7 @@ sub importAssetData {
WebGUI::Asset->loadModule( $class );
my %properties = %{ $data->{properties} };
delete $properties{tagId};
if ($options->{inheritPermissions}) {
delete $properties{ownerUserId};
delete $properties{groupIdView};
@ -173,6 +174,13 @@ sub importAssetData {
$properties{isDefault} = 1;
}
if ($options->{clearPackageFlag}) {
$properties{isPackage} = 0;
}
if ($options->{setDefaultTemplate}) {
$properties{isDefault} = 1;
}
my $asset = eval { $class->new($session, $id, $version); };
if (! Exception::Class->caught()) { # update an existing revision