diff --git a/lib/WebGUI/i18n/English/Asset_EMSSubmission.pm b/lib/WebGUI/i18n/English/Asset_EMSSubmission.pm new file mode 100644 index 000000000..0801e0ea9 --- /dev/null +++ b/lib/WebGUI/i18n/English/Asset_EMSSubmission.pm @@ -0,0 +1,22 @@ +package WebGUI::i18n::English::Asset_EMSSubmission; ##Be sure to change the package name to match the filename + +use strict; ##Required for all good Perl::Critic compliant code + +our $I18N = { ##hashref of hashes + + 'assetName' => { + message => q|EMS Event Submission|, + lastUpdated => 1131394072, + context => q|Then name of the Asset ( Event Management System - Event Submission ).| + }, + +# 'TODO' => { +# message => q|TODO|, +# lastUpdated => 1131394072, +# context => q|TODO| +# }, + +}; + +1; +#vim:ft=perl diff --git a/lib/WebGUI/i18n/English/Asset_EMSSubmissionForm.pm b/lib/WebGUI/i18n/English/Asset_EMSSubmissionForm.pm index 6ba221413..9c664dde5 100644 --- a/lib/WebGUI/i18n/English/Asset_EMSSubmissionForm.pm +++ b/lib/WebGUI/i18n/English/Asset_EMSSubmissionForm.pm @@ -1,9 +1,14 @@ -package WebGUI::i18n::English::_i18n; ##Be sure to change the package name to match the filename +package WebGUI::i18n::English::Asset_EMSSubmissionForm; ##Be sure to change the package name to match the filename use strict; ##Required for all good Perl::Critic compliant code our $I18N = { ##hashref of hashes + 'assetName' => { + message => q|EMS Event Submission Form|, + lastUpdated => 1131394072, + context => q|Then name of the Asset ( Event Management System - Event Submission Form ).| + }, 'next submission id label' => { message => q|Next Submission Id|, lastUpdated => 1131394072, diff --git a/t/Asset/EMSSubmissionForm.t b/t/Asset/EMSSubmissionForm.t index ee8ccad28..a22f719ed 100644 --- a/t/Asset/EMSSubmissionForm.t +++ b/t/Asset/EMSSubmissionForm.t @@ -135,6 +135,8 @@ ok( !$frmA->validateSubmission({ }), 'not a valid submission' ); # TODO: test more field validations +print "after tests\n"; + # TODO use meta field in this form my $frmB = $ems->addChild({ className => 'WebGUI::Asset::EMSSubmissionForm', @@ -145,6 +147,7 @@ my $frmB = $ems->addChild({ }, }); # TODO: test meta field validation +print "created one form\n"; loginUserA; @@ -153,10 +156,12 @@ my $sub1 = $frmA->addSubmission({ title => 'my favorite thing to talk about', }); +print "created one submission\n"; #this one should fail my $sub2 = $frmB->addSubmission({ title => 'why i like to be important', }); +print "created another submission\n"; loginUserB; @@ -165,19 +170,23 @@ my $sub3 = $frmB->addSubmission({ title => 'five minutes of me', }); +print "created third submission\n"; loginUserC; # should work my $sub4 = $frmB->addSubmission({ title => 'why humility is underrated', }); +print "created fourth submission\n"; # should work my $sub5 = $frmA->addSubmission({ title => 'what you should know about everybody', }); +print "created fifth submission\n"; $sub1->addComment({ 'this is a test comment' }); +print "added a comment\n"; my $TODO = q{ modify submission(s) @@ -186,6 +195,7 @@ run submission approval activity run submission cleanup activity }; $versionTag->commit; +print "end of program\n"; #---------------------------------------------------------------------------- # Cleanup