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

fix package importing

Browse source
This commit is contained in:
Graham Knop 2007-09-07 15:15:16 +00:00
parent 2de16a2cf8
commit eaf0a55ec1
2 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/AssetPackage.pm
View file

@ -181,7 +181,10 @@ sub importPackage {
foreach my $file (sort(@{$decompressed->getFiles})) {
next unless ($decompressed->getFileExtension($file) eq "json");
$error->info("Found data file $file");
my $data = eval{JSON::jsonToObj($decompressed->getFileContentsAsScalar($file))};
my $data = eval{
local $JSON::UnMapping = 1;
JSON::jsonToObj($decompressed->getFileContentsAsScalar($file))
};
if ($@ || $data->{properties}{assetId} eq "" || $data->{properties}{className} eq "" || $data->{properties}{revisionDate} eq "") {
$error->error("package corruption: ".$@) if ($@);
return "corrupt";