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

Made some efficiency improvements in wobject save.

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Wobject/Article.pm
View file

@ -122,7 +122,7 @@ sub www_edit {
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my ($image, $attachment, %property);
$_[0]->SUPER::www_editSave();
$_[0]->SUPER::www_editSave() if ($_[0]->get("wobjectId") eq "new");
$image = WebGUI::Attachment->new("",$_[0]->get("wobjectId"));
$image->save("image");
$attachment = WebGUI::Attachment->new("",$_[0]->get("wobjectId"));
@ -134,7 +134,7 @@ sub www_editSave {
$property{linkTitle} = $session{form}{linkTitle};
$property{linkURL} = $session{form}{linkURL};
$property{allowDiscussion} = $session{form}{allowDiscussion};
$_[0]->set(\%property);
$_[0]->SUPER::www_editSave(\%property);
return "";
}

3
lib/WebGUI/Wobject/EventsCalendar.pm
View file

@ -170,8 +170,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
calendarLayout=>$session{form}{calendarLayout},
paginateAfter=>$session{form}{paginateAfter}
});

3
lib/WebGUI/Wobject/ExtraColumn.pm
View file

@ -86,8 +86,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
spacer=>$session{form}{spacer},
width=>$session{form}{width},
class=>$session{form}{class}

9
lib/WebGUI/Wobject/FAQ.pm
View file

@ -103,11 +103,10 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
if (WebGUI::Privilege::canEditPage()) {
$_[0]->SUPER::www_editSave();
$_[0]->set({
tocOn=>$session{form}{tocOn},
topOn=>$session{form}{topOn},
qaOn=>$session{form}{qaOn}
$_[0]->SUPER::www_editSave({
tocOn=>$session{form}{tocOn},
topOn=>$session{form}{topOn},
qaOn=>$session{form}{qaOn}
});
if ($session{form}{proceed}) {
$_[0]->www_editQuestion();

3
lib/WebGUI/Wobject/FileManager.pm
View file

@ -166,8 +166,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
paginateAfter=>$session{form}{paginateAfter},
displayThumbnails=>$session{form}{displayThumbnails}
});

4
lib/WebGUI/Wobject/Item.pm
View file

@ -62,12 +62,12 @@ sub www_edit {
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my ($attachment, $property);
$_[0]->SUPER::www_editSave();
$_[0]->SUPER::www_editSave() if ($_[0]->get("wobjectId") eq "new");
$attachment = WebGUI::Attachment->new("",$_[0]->get("wobjectId"));
$attachment->save("attachment");
$property->{linkURL} = $session{form}{linkURL};
$property->{attachment} = $attachment->getFilename if ($attachment->getFilename ne "");
$_[0]->set($property);
$_[0]->SUPER::www_editSave($property);
return "";
}

3
lib/WebGUI/Wobject/LinkList.pm
View file

@ -96,8 +96,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
indent=>$session{form}{indent},
bullet=>$session{form}{bullet},
lineSpacing=>$session{form}{lineSpacing}

3
lib/WebGUI/Wobject/MailForm.pm
View file

@ -153,11 +153,10 @@ sub www_edit {
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my ($property);
$_[0]->SUPER::www_editSave();
foreach my $field (@fields) {
$property->{$field} = $session{form}{$field};
}
$_[0]->set($property);
$_[0]->SUPER::www_editSave($property);
if ($session{form}{proceed}) {
return $_[0]->www_editField();
} else {

3
lib/WebGUI/Wobject/MessageBoard.pm
View file

@ -67,8 +67,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
messagesPerPage=>$session{form}{messagesPerPage}
});
return "";

3
lib/WebGUI/Wobject/Poll.pm
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 "";
}

4
lib/WebGUI/Wobject/Product.pm
View file

@ -333,7 +333,7 @@ sub www_edit {
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my ($file, %property);
$_[0]->SUPER::www_editSave();
$_[0]->SUPER::www_editSave() if ($_[0]->get("wobjectId") eq "new");
$file = WebGUI::Attachment->new("",$_[0]->get("wobjectId"));
$file->save("image1");
$property{image1}=$file->getFilename("image1") if ($file->getFilename("image1") ne "");
@ -355,7 +355,7 @@ sub www_editSave {
$property{Product_templateId}=$session{form}{Product_templateId};
$property{price}=$session{form}{price};
$property{productNumber}=$session{form}{productNumber};
$_[0]->set(\%property);
$_[0]->SUPER::www_editSave(\%property);
return "";
}

4
lib/WebGUI/Wobject/SQLReport.pm
View file

@ -82,9 +82,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my ($wobjectId, $displayTitle, $image, $attachment);
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
template=>$session{form}{template},
dbQuery=>$session{form}{dbQuery},
convertCarriageReturns=>$session{form}{convertCarriageReturns},

3
lib/WebGUI/Wobject/SiteMap.pm
View file

@ -100,14 +100,13 @@ sub www_edit {
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my ($property);
$_[0]->SUPER::www_editSave();
$property->{indent} = $session{form}{indent};
$property->{displaySynopsis} = $session{form}{displaySynopsis};
$property->{bullet} = $session{form}{bullet};
$property->{startAtThisLevel} = $session{form}{startAtThisLevel};
$property->{depth} = $session{form}{depth};
$property->{lineSpacing} = $session{form}{lineSpacing};
$_[0]->set($property);
$_[0]->SUPER::www_editSave($property);
return "";
}

3
lib/WebGUI/Wobject/SyndicatedContent.pm
View file

@ -71,11 +71,10 @@ sub www_edit {
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
my ($property);
$_[0]->SUPER::www_editSave();
$property->{rssUrl} = $session{form}{rssUrl};
$property->{content} = $session{form}{content} if ($session{form}{content} ne "");
$property->{lastFetched} = $session{form}{lastFetched} if ($session{form}{lastFetched} ne "");
$_[0]->set($property);
$_[0]->SUPER::www_editSave($property);
return "";
}

5
lib/WebGUI/Wobject/USS.pm
View file

@ -14,7 +14,7 @@ use strict;
use Tie::CPHash;
use WebGUI::Attachment;
use WebGUI::DateTime;
#use WebGUI::Discussion;
use WebGUI::Discussion;
use WebGUI::HTML;
use WebGUI::HTMLForm;
use WebGUI::Icon;
@ -333,8 +333,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
submissionsPerPage=>$session{form}{submissionsPerPage},
groupToContribute=>$session{form}{groupToContribute},
groupToApprove=>$session{form}{groupToApprove},

3
lib/WebGUI/Wobject/WobjectProxy.pm
View file

@ -87,8 +87,7 @@ sub www_edit {
#-------------------------------------------------------------------
sub www_editSave {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());
$_[0]->SUPER::www_editSave();
$_[0]->set({
$_[0]->SUPER::www_editSave({
proxiedWobjectId=>$session{form}{proxiedWobjectId}
});
return "";