Bugfix [ 940008 ] error deleting parts of a survey in 6.0.1 (Thanks to

Andreas Sexauer.)
This commit is contained in:
JT Smith 2004-05-02 16:18:30 +00:00
parent a293678acd
commit d0fb8d5ab7
2 changed files with 3 additions and 1 deletions

View file

@ -25,6 +25,8 @@
- Bugfix [ 943298 ] Events Calendar recurrence error in WG6.0 (thanks to
Frank Dillon).
- Bugfix [ 942865 ] urlizedTitle problem. (Thanks to tr0nd).
- Bugfix [ 940008 ] error deleting parts of a survey in 6.0.1 (Thanks to
Andreas Sexauer.)
6.0.1

View file

@ -436,7 +436,7 @@ sub www_deleteAnswer {
#-------------------------------------------------------------------
sub www_deleteAnswerConfirm {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditWobject($_[0]->get("wobjectId")));
WebGUI::SQL->write("delete from Survey_response where Survey_answerId=".quote($session{form}{aid}));
WebGUI::SQL->write("delete from Survey_questionResponse where Survey_answerId=".quote($session{form}{aid}));
$_[0]->deleteCollateral("Survey_answer","Survey_answerId",$session{form}{aid});
$_[0]->reorderCollateral("Survey_answer","Survey_answerId","Survey_id");
return $_[0]->www_editQuestion;