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

Minor fix. JSON no longer assumes proper utf8, but uses whatever off-brand locale a luser wants to use.

Browse source
This commit is contained in:
Kaleb Murphy 2008-12-02 16:03:23 +00:00
parent a4207e7ec5
commit 5127a307b7
3 changed files with 9 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/WebGUI/Asset/Wobject/Survey.pm
View file

@ -277,7 +277,7 @@ sub www_submitObjectEdit {
return $self->session->privilege->insufficient()
unless ($self->session->user->isInGroup($self->get('groupToEditSurvey')));
# my $ref = @{decode_json($self->session->form->process("data"))};
# my $ref = @{from_json($self->session->form->process("data"))};
my $responses = $self->session->form->paramsHashRef();
my @address = split /-/, $responses->{id};
@ -367,7 +367,7 @@ sub www_dragDrop {
return $self->session->privilege->insufficient()
unless ($self->session->user->isInGroup($self->get('groupToEditSurvey')));
my $p = decode_json( $self->session->form->process("data") );
my $p = from_json( $self->session->form->process("data") );
my @tid = split /-/, $p->{target}->{id};
my @bid = split /-/, $p->{before}->{id};
@ -512,7 +512,7 @@ sub www_loadSurvey {
"ddhtml", $html, "ids", \@ids, "type", $var->{type}
};
$self->session->http->setMimeType('application/json');
return encode_json($return);
return to_json($return);
} ## end sub www_loadSurvey
#-------------------------------------------------------------------
@ -768,7 +768,7 @@ sub surveyEnd {
}
}
# $self->session->http->setRedirect($url);
return encode_json({ "type", "forward", "url", $url });
return to_json({ "type", "forward", "url", $url });
} ## end sub surveyEnd
#-------------------------------------------------------------------
@ -825,7 +825,7 @@ sub prepareShowSurveyTemplate {
my $out = $self->processTemplate( $section, $self->get("surveyQuestionsId") );
$self->session->http->setMimeType('application/json');
return encode_json( { "type", "displayquestions", "section", $section, "questions", $questions, "html", $out } );
return to_json( { "type", "displayquestions", "section", $section, "questions", $questions, "html", $out } );
} ## end sub prepareShowSurveyTemplate
#-------------------------------------------------------------------