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

Fix import Story Archive packages with sub-stories.

Browse source
This commit is contained in:
Colin Kuskie 2009-09-10 08:34:30 -07:00
parent f5b2b6d4cd
commit 021b7f8fed
3 changed files with 16 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lib/WebGUI/Asset/Wobject/StoryArchive.pm
View file

@ -41,6 +41,9 @@ sub addChild {
my $self = shift;
my ($properties) = @_;
##Allow subclassing
if ($properties->{className} eq 'WebGUI::Asset::Wobject::Folder') {
return $self->SUPER::addChild(@_);
}
return undef unless $properties->{className} =~ /^WebGUI::Asset::Story/;
my $todayFolder = $self->getFolder;
return undef unless $todayFolder;