diff --git a/lib/WebGUI/Asset/EMSSubmissionForm.pm b/lib/WebGUI/Asset/EMSSubmissionForm.pm index c3f1a6c41..ef93c2c2a 100644 --- a/lib/WebGUI/Asset/EMSSubmissionForm.pm +++ b/lib/WebGUI/Asset/EMSSubmissionForm.pm @@ -398,80 +398,6 @@ sub getQueueUrl { } -#------------------------------------------------------------------- - -=head2 indexContent ( ) - -Making private. See WebGUI::Asset::indexContent() for additonal details. - -=cut - -#sub indexContent { -# my $self = shift; -# my $indexer = $self->SUPER::indexContent; -# $indexer->setIsPublic(0); -#} - -#------------------------------------------------------------------- - -=head2 prepareView ( ) - -See WebGUI::Asset::prepareView() for details. -we shouldn't get here, there is nothing to view... - -=cut - -sub prepareView { - my $self = shift; - $self->SUPER::prepareView(); - #my $template = WebGUI::Asset::Template->new( $self->session, $self->get("templateId") ); - #$template->prepare($self->getMetaDataAsTemplateVariables); - #$self->{_viewTemplate} = $template; -} - -#------------------------------------------------------------------- - -=head2 processPropertiesFromFormPost ( ) - -Used to process properties from the form posted. Do custom things with -noFormPost fields here, or do whatever you want. This method is called -when /yourAssetUrl?func=editSave is requested/posted. - -=cut - -#sub processPropertiesFromFormPost { -# my $self = shift; -# $self->SUPER::processPropertiesFromFormPost; -#} - -#------------------------------------------------------------------- - -=head2 purge ( ) - -This method is called when data is purged by the system. -removes collateral data associated with a NewAsset when the system -purges it's data. This method is unnecessary, but if you have -auxiliary, ancillary, or "collateral" data or files related to your -asset instances, you will need to purge them here. - -=cut - -#sub purge { -# my $self = shift; -# return $self->SUPER::purge; -#} - -#------------------------------------------------------------------- - -=head2 purgeRevision ( ) - -This method is called when data is purged by the system. -=cut - -#sub purgeRevision { # my $self = shift; -# return $self->SUPER::purgeRevision; -#} - #------------------------------------------------------------------- =head2 view ( ) diff --git a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm index 695356da6..f3e62db5a 100644 --- a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm +++ b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm @@ -55,6 +55,7 @@ sub addGroupToSubmitList { } #------------------------------------------------------------------- + =head2 addSubmissionForm creates a child of class WG::Asset::EMSSubmissionForm @@ -102,6 +103,7 @@ sub addSubmissionForm { } #------------------------------------------------------------------- + =head2 canSubmit returns true is the current user can submit to any form attached to this EMS @@ -495,6 +497,7 @@ sub getRibbons { } #------------------------------------------------------------------- + =head2 getSubmissionLocations retuns an arrayref of the locations found in the submission location list @@ -572,6 +575,7 @@ sub getTokens { } #------------------------------------------------------------------- + =head2 hasSubmissionForms returns true if the EMS has subission forms attached @@ -588,6 +592,7 @@ sub hasSubmissionForms { } #------------------------------------------------------------------- + =head2 hasSubmissions returns true if the current user has submission forms in this EMS @@ -2656,6 +2661,7 @@ sub www_viewSchedule { } #--------------------------------------------- + =head2 www_viewSubmissionQueue =cut