Remove cookie jar files left by the HttpProxy asset. Finishes the fix for bug #12327.

This commit is contained in:
Colin Kuskie 2012-04-02 18:32:13 -07:00
parent 604887ff66
commit 07bd545538
4 changed files with 130 additions and 0 deletions

View file

@ -31,10 +31,26 @@ my $quiet; # this line required
my $session = start(); # this line required
# upgrade functions go here
installCleanCookieJars($session);
finish($session); # this line required
#----------------------------------------------------------------------------
# Describe what our function does
sub installCleanCookieJars {
my $session = shift;
print "\tInstall the new CleanCookieJars workflow activity... " unless $quiet;
# and here's our code
$session->config->addToArray('workflowActivities/None', 'WebGUI::Workflow::Activity::CleanCookieJars');
my $workflow = WebGUI::Workflow->new($session, 'pbworkflow000000000001');
my $cleaner = $workflow->addActivity('WebGUI::Workflow::Activity::CleanCookieJars');
$cleaner->set('title', 'Clean HttpProxy Cookie jars');
$cleaner->set('description', 'Removes cookie jar files from the HttpProxy asset that are older than 1 day');
print "DONE!\n" unless $quiet;
}
#----------------------------------------------------------------------------
# Describe what our function does
#sub exampleFunction {