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

Fixed Survey "copy" button on Edit Survey page

Browse source
This commit is contained in:
Patrick Donelan 2009-05-11 05:20:27 +00:00
parent 5d6b4093be
commit 5f80ac35f6
2 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

BIN
docs/upgrades/packages-7.7.6/root_import_survey_default-answer-edit.wgpkg
View file

Binary file not shown.

7
lib/WebGUI/Asset/Wobject/Survey/SurveyJSON.pm
View file

@ -805,6 +805,13 @@ sub copy {
# Update $address with the index of the newly created question # Update $address with the index of the newly created question
$address->[1] = $self->lastQuestionIndex($address); $address->[1] = $self->lastQuestionIndex($address);
} }
elsif ( $count == 3 ) {
# Clone the indexed answer onto the end of the list of answers..
push @{ $self->answers($address) }, clone $self->answer($address);
# Update $address with the index of the newly created answer
$address->[2]++;
}
# Return the (modified) $address # Return the (modified) $address
return $address; return $address;
} }