fix adding new WikiPage assets

This commit is contained in:
Doug Bell 2011-08-01 16:30:36 -05:00
parent 37b8d15c0f
commit 1992f33de9
2 changed files with 10 additions and 8 deletions

View file

@ -451,7 +451,7 @@ around canEdit => sub {
my $addNew = $form->process("func" ) eq "add";
my $editSave = $form->process("assetId" ) eq "new"
&& $form->process("func" ) eq "editSave"
&& $form->process("class","className" ) eq "WebGUI::Asset::WikiPage";
&& $form->process("className","className" ) eq "WebGUI::Asset::WikiPage";
my $canEdit = ( ($addNew || $editSave) && $self->canEditPages )
|| $self->$orig(@_);
return $canEdit;