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

Another upgraded upgrade script.

Browse source
This commit is contained in:
Colin Kuskie 2009-07-09 16:48:24 +00:00
parent 3911846ce8
commit 80b5c57155
1 changed files with 8 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

9
docs/upgrades/upgrade_7.7.13-7.7.14.pl
View file

@ -58,7 +58,14 @@ sub addPackage {
$storage->addFileFromFilesystem( $file ); $storage->addFileFromFilesystem( $file );
# Import the package into the import node # Import the package into the import node
my $package = WebGUI::Asset->getImportNode($session)->importPackage( $storage ); my $package = eval { WebGUI::Asset->getImportNode($session)->importPackage( $storage ); };
if ($package eq 'corrupt') {
die "Corrupt package found in $file. Stopping upgrade.\n";
}
if ($@ || !defined $package) {
die "Error during package import on $file: $@\nStopping upgrade\n.";
}
# Turn off the package flag, and set the default flag for templates added # Turn off the package flag, and set the default flag for templates added
my $assetIds = $package->getLineage( ['self','descendants'] ); my $assetIds = $package->getLineage( ['self','descendants'] );