Made some efficiency improvements in wobject save.

This commit is contained in:
JT Smith 2002-10-07 00:41:36 +00:00
parent 8cf465c3e6
commit c65c92ebf5
17 changed files with 25 additions and 38 deletions

View file

@ -125,7 +125,6 @@ sub www_edit {
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my (@answer, $i, $property);
$_[0]->SUPER::www_editSave();
@answer = split("\n",$session{form}{answers});
for ($i=1; $i<=20; $i++) {
$property->{'a'.$i} = $answer[($i-1)];
@ -136,7 +135,7 @@ sub www_editSave {
$property->{graphWidth} = $session{form}{graphWidth};
$property->{active} = $session{form}{active};
$property->{question} = $session{form}{question};
$_[0]->set($property);
$_[0]->SUPER::www_editSave($property);
return "";
}