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

fix [ 1279887 ] unable to copy Survey Wobject

Browse source
This commit is contained in:
JT Smith 2005-09-11 14:20:27 +00:00
parent 056cc44f05
commit 68d5986c39
2 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -135,7 +135,7 @@ sub duplicate {
$newAsset = $self->SUPER::duplicate(shift);
$newSurveyId = WebGUI::Id::generate();
$newAsset->set({
$newAsset->update({
Survey_id=>$newSurveyId
});
$a = WebGUI::SQL->read("select * from Survey_question where Survey_id=".quote($self->get("Survey_id"))
@ -165,6 +165,7 @@ sub duplicate {
$b->finish;
}
$a->finish;
return $newAsset;
}
#-------------------------------------------------------------------
@ -291,10 +292,10 @@ sub getEditForm {
if ($self->get("assetId") eq "new") {
$tabform->getTab('properties')->whatNext(
-options=>{
addQuestion=>WebGUI::International::get(28,'Asset_Survey'),
editQuestion=>WebGUI::International::get(28,'Asset_Survey'),
backToPage=>WebGUI::International::get(745,'Asset_Survey')
},
-value=>"addQuestion",
-value=>"editQuestion",
-hoverHelp => WebGUI::International::get('what next','Asset_Survey'),
);
}