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

add a method to save the new keywords from the from in www_byKeyword.

Browse source
This commit is contained in:
Colin Kuskie 2010-05-03 19:29:55 -07:00
parent 5afdefe4fb
commit 3ea9f29a3f
1 changed files with 21 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

22
lib/WebGUI/Asset/Wobject/WikiMaster.pm
View file

@ -870,7 +870,7 @@ sub www_byKeyword {
$p->appendTemplateVars($var); $p->appendTemplateVars($var);
if ($self->canAdminister) { if ($self->canAdminister) {
$var->{formHeader} = WebGUI::Form::formHeader($session, {action => $self->getUrl, method => 'GET'}) $var->{formHeader} = WebGUI::Form::formHeader($session, {action => $self->getUrl, method => 'GET'})
. WebGUI::Form::hidden($session, { name => 'func', value => 'keywordKeywordSave',}) . WebGUI::Form::hidden($session, { name => 'func', value => 'subKeywordSave',})
. WebGUI::Form::hidden($session, { name => 'thisKeyword', value => $keyword,}); . WebGUI::Form::hidden($session, { name => 'thisKeyword', value => $keyword,});
my $subKeywords = join ', ', $self->getSubKeywords($keyword); my $subKeywords = join ', ', $self->getSubKeywords($keyword);
$var->{keywordForm} = WebGUI::Form::keyword($session, { $var->{keywordForm} = WebGUI::Form::keyword($session, {
@ -984,4 +984,24 @@ sub www_search {
return $self->processStyle($self->processTemplate($var, $self->get('searchTemplateId'))); return $self->processStyle($self->processTemplate($var, $self->get('searchTemplateId')));
} }
#-------------------------------------------------------------------
=head2 www_subKeywordSave
Process the form from www_byKeyword and update the subkeywords for a keyword in this wiki.
=cut
sub www_subKeywordSave {
my $self = shift;
my $form = $self->session->form;
my $subKeywords = $form->process('subKeywords', 'keywords');
my $keyword = $form->process('thisKeyword');
my @subKeywords = @{ WebGUI::Keyword::string2list($subKeywords) };
$self->setSubKeywords($keyword, @subKeywords);
return $self->www_byKeyword;
}
1; 1;