Fix POD whitespace issues in the EMS.

This commit is contained in:
Colin Kuskie 2009-11-05 15:56:54 -08:00
parent c3727be61f
commit 0aab1c1114
3 changed files with 4 additions and 2 deletions

View file

@ -367,7 +367,6 @@ parameters for the submission
=cut =cut
sub www_editSubmission { sub www_editSubmission {
my $this = shift; my $this = shift;
my $self; my $self;
@ -436,7 +435,7 @@ sub www_editSubmission {
delete $field->{name}; # don't want readOnly to generate a hidden field delete $field->{name}; # don't want readOnly to generate a hidden field
$field->{fieldType} = "readOnly"; $field->{fieldType} = "readOnly";
} }
$newform->dynamicField(%$field); $newform->dynamicField(%$field);
} else { } else {
# TODO see that the data gets formatted # TODO see that the data gets formatted
@ -545,6 +544,7 @@ sub getEditTabs {
} }
#------------------------------------------------------------------- #-------------------------------------------------------------------
=head2 getQueueUrl =head2 getQueueUrl
returns the URL for the submission queue page with the submisison id in the hash part returns the URL for the submission queue page with the submisison id in the hash part

View file

@ -385,6 +385,7 @@ sub getFormDescription {
} }
#------------------------------------------------------------------- #-------------------------------------------------------------------
=head2 getQueueUrl =head2 getQueueUrl
returns the URL for the submission queue page with the submisison id in the hash part returns the URL for the submission queue page with the submisison id in the hash part

View file

@ -37,6 +37,7 @@ use Tie::IxHash;
use Data::Dumper; use Data::Dumper;
#------------------------------------------------------------------- #-------------------------------------------------------------------
=head2 addGroupToSubmitList ( groupId ) =head2 addGroupToSubmitList ( groupId )
adds the parameter to eventSubmissionGroups adds the parameter to eventSubmissionGroups