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

processPropertiesFromFormPost to processEditForm

Browse source
This commit is contained in:
Doug Bell 2010-05-03 16:33:06 -05:00
parent ad96c88a36
commit 3c17dafeb4
32 changed files with 154 additions and 169 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -243,14 +243,14 @@ sub prepareView {
#-------------------------------------------------------------------
=head2 processPropertiesFromFormPost ( )
=head2 processEditForm ( )
Extend the super class to calculate total asset size from
any files stored in the storage location.
=cut
override processPropertiesFromFormPost => sub {
override processEditForm => sub {
my $self = shift;
super();
my $size = 0;

4
lib/WebGUI/Asset/Wobject/Calendar.pm
View file

@ -855,7 +855,7 @@ sub prepareView {
#----------------------------------------------------------------------------
=head2 processPropertiesFromFormPost ( )
=head2 processEditForm ( )
Process the Calendar Edit form.
@ -865,7 +865,7 @@ Adds / removes feeds from the feed trough.
=cut
override processPropertiesFromFormPost => sub {
override processEditForm => sub {
my $self = shift;
my $session = $self->session;
my $form = $self->session->form;

4
lib/WebGUI/Asset/Wobject/Carousel.pm
View file

@ -157,13 +157,13 @@ sub prepareView {
#-------------------------------------------------------------------
=head2 processPropertiesFromFormPost ( )
=head2 processEditForm ( )
Used to process properties from the form posted.
=cut
override processPropertiesFromFormPost => sub {
override processEditForm => sub {
my $self = shift;
my $form = $self->session->form;
my (@items,$items);

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

@ -982,7 +982,6 @@ sub duplicateBranch {
Add a tab for the mail interface.
=cut
sub getEditTabs {
my $self = shift;
@ -990,6 +989,8 @@ sub getEditTabs {
return ($self->next::method, ['mail', $i18n->get('mail'), 9]);
}
=cut
#-------------------------------------------------------------------
=head2 getNewThreadUrl( )
@ -1389,7 +1390,7 @@ sub prepareView {
#-------------------------------------------------------------------
=head2 processPropertiesFromFormPost
=head2 processEditForm
Extend the base method to handle creating subscription groups, propagating
group privileges to all descendants and clearing scratch variables for sort key
@ -1397,7 +1398,7 @@ and direction.
=cut
sub processPropertiesFromFormPost {
sub processEditForm {
my $self = shift;
my $updatePrivs = ($self->session->form->process("groupIdView") ne $self->groupIdView || $self->session->form->process("groupIdEdit") ne $self->groupIdEdit);
$self->next::method;

4
lib/WebGUI/Asset/Wobject/Dashboard.pm
View file

@ -280,13 +280,13 @@ override prepareView => sub {
#-------------------------------------------------------------------
=head2 processPropertiesFromFormPost
=head2 processEditForm
Extends the base method to handle assetsToHide.
=cut
override processPropertiesFromFormPost => sub {
override processEditForm => sub {
my $self = shift;
super();
if ($self->session->form->process("assetId") eq "new" && $self->session->form->process("class") eq 'WebGUI::Asset::Wobject::Dashboard') {

4
lib/WebGUI/Asset/Wobject/DataTable.pm
View file

@ -152,8 +152,6 @@ override getEditForm => sub {
Add a tab for the data table.
=cut
override getEditTabs => sub {
my $self = shift;
my $i18n = WebGUI::International->new( $self->session, "Asset_DataTable" );
@ -161,6 +159,8 @@ override getEditTabs => sub {
return ( super(), [ "data" => $i18n->get("tab label data") ], );
};
=cut
#----------------------------------------------------------------------------
=head2 getTemplateVars ( )

4
lib/WebGUI/Asset/Wobject/GalleryAlbum.pm
View file

@ -803,14 +803,14 @@ sub processStyle {
#----------------------------------------------------------------------------
=head2 processPropertiesFromFormPost ( )
=head2 processEditForm ( )
Process the form to save the asset. Request approval from the Gallery's
approval workflow.
=cut
sub processPropertiesFromFormPost {
sub processEditForm {
my $self = shift;
my $form = $self->session->form;
my $errors = $self->next::method || [];

4
lib/WebGUI/Asset/Wobject/Poll.pm
View file

@ -353,13 +353,13 @@ sub prepareView {
#-------------------------------------------------------------------
=head2 processPropertiesFromFormPost
=head2 processEditForm
Extend the base method to handle the answers and the Graphing plugin.
=cut
override processPropertiesFromFormPost => sub {
override processEditForm => sub {
my $self = shift;
super();
my $property = {};

4
lib/WebGUI/Asset/Wobject/WikiMaster.pm
View file

@ -727,13 +727,13 @@ sub prepareView {
#-------------------------------------------------------------------
=head2 processPropertiesFromFormPost
=head2 processEditForm
Extend the master method to propagate view and edit permissions down to the wiki pages.
=cut
override processPropertiesFromFormPost => sub {
override processEditForm => sub {
my $self = shift;
my $groupsChanged =
(($self->session->form->process('groupIdView') ne $self->groupIdView)