diff --git a/docs/upgrades/upgrade_7.7.20-7.8.0.pl b/docs/upgrades/upgrade_7.7.20-7.8.0.pl
index 08ffebafe..55b01d88e 100644
--- a/docs/upgrades/upgrade_7.7.20-7.8.0.pl
+++ b/docs/upgrades/upgrade_7.7.20-7.8.0.pl
@@ -119,7 +119,7 @@ sub fixEmptyCalendarIcalFeeds {
print "DONE!\n" unless $quiet;
}
-[
+
#----------------------------------------------------------------------------
# Add tables for the EMS Submission feature
sub addEMSSubmission {
@@ -172,7 +172,7 @@ ESQL
print "DONE!\n" unless $quiet;
}
-]
+
#----------------------------------------------------------------------------
# Add the column for featured wiki pages
sub addFeaturedPageWiki {
diff --git a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
index 9759575e8..1e4b2457d 100644
--- a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
+++ b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
@@ -793,7 +793,6 @@ sub www_addSubmission {
$session->http->setMimeType( 'text/html' );
}
my $content = '
' . $title . '
' ;
-use lib '/root/pb/lib'; use dav; dav::log $content;
if( $asJson ) {
return JSON->new->encode( { text => $content, title => $title, id => 'list' . rand } );
} else {
diff --git a/lib/WebGUI/Workflow/Activity/CleanupEMSSubmissions.pm b/lib/WebGUI/Workflow/Activity/CleanupEMSSubmissions.pm
index 69eadb33e..3cd147211 100644
--- a/lib/WebGUI/Workflow/Activity/CleanupEMSSubmissions.pm
+++ b/lib/WebGUI/Workflow/Activity/CleanupEMSSubmissions.pm
@@ -68,13 +68,10 @@ See WebGUI::Workflow::Activity::execute() for details.
=cut
-use lib '/root/pb/lib'; use dav;
-
sub execute {
my $self = shift;
my $session = $self->session;
my $root = WebGUI::Asset->getRoot($session);
-dav::log __PACKAGE__ . " executing\n";
# keep track of how much time it's taking
my $start = time;
@@ -86,7 +83,6 @@ dav::log __PACKAGE__ . " executing\n";
} );
for my $emsForm ( @$list ) {
-dav::log __PACKAGE__ . "::executing::emsForm loop\n";
my $daysBeforeCleanup = $emsForm->get('daysBeforeCleanup') ;
next if ! $daysBeforeCleanup;
my $whereClause = q{ submissionStatus='denied' };
@@ -101,7 +97,6 @@ dav::log __PACKAGE__ . "::executing::emsForm loop\n";
whereClause => $whereClause,
} );
for my $submission ( @$res ) {
-dav::log __PACKAGE__ . "::executing::submission loop\n";
$submission->purge;
$limit--;
return $self->WAITING(1) if ! $limit or time > $start + $timeLimit;