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

Fixed minor Survey bug that could prevent tests from running in some cases

Browse source
This commit is contained in:
Patrick Donelan 2009-06-27 00:04:38 +00:00
parent 7901e1d398
commit bb3de4bf96
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -2828,6 +2828,10 @@ sub www_runTest {
my $test = WebGUI::Asset::Wobject::Survey::Test->new($session, $testId)
or return $self->www_editTestSuite('Unable to find test');
# Remove any in-progress reponses for current user
$self->session->db->write( 'delete from Survey_response where assetId = ? and userId = ? and isComplete = 0',
[ $self->getId, $self->session->user->userId() ] );
my $result = $test->run or return $self->www_editTestSuite('Unable to run test');
my $tap = $result->{tap} or return $self->www_editTestSuite('Unable to determine test result');