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

Minor fixes (typo and unnecessary hash dereference)

Browse source
This commit is contained in:
Patrick Donelan 2008-10-15 01:03:13 +00:00
parent 2a9bbc7490
commit afde10109f
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -658,7 +658,7 @@ $self->session->errorHandler->error("Can take survey");
return $self->surveyEnd();
}
return $self->surveyEnd() if($seslf->response->surveyEnd());
return $self->surveyEnd() if($self->response->surveyEnd());
my $questions = $self->response->nextQuestions();
$self->session->errorHandler->error("Load Questions had ".@$questions." questions");

2
lib/WebGUI/Asset/Wobject/Survey/ResponseJSON.pm
View file

@ -240,7 +240,7 @@ $self->log("qAddy was $$qAddy[0]-$$qAddy[1]");
last;
}
my %question = %{$self->survey->question([$$qAddy[0],$$qAddy[1]])};
$question->{'text'} =~ s/\[\[([^\%]*?)\]\]/$self->getPreviousAnswer($1)/eg;
$question{'text'} =~ s/\[\[([^\%]*?)\]\]/$self->getPreviousAnswer($1)/eg;
delete $question{answers};
$question{id} = "$$qAddy[0]-$$qAddy[1]";
$question{sid} = "$$qAddy[0]";