Add Passive Analytics modules, Workflow Activites, i18n and content

handler.
This commit is contained in:
Colin Kuskie 2009-01-21 10:19:08 -08:00 committed by Patrick Donelan
parent d59cdea8a7
commit eb844fd26e
6 changed files with 790 additions and 0 deletions

View file

@ -0,0 +1,49 @@
package WebGUI::Content::PassiveAnalytics;
use strict;
use WebGUI::AdminConsole;
use WebGUI::Exception;
use WebGUI::PassiveAnalytics::Flow;
=head1 NAME
Package WebGUI::Content::PassiveAnalytics
=head1 DESCRIPTION
Handle all requests for building and editing Passive Analytic flows.
=head1 SYNOPSIS
use WebGUI::Content::PassiveAnalytics;
my $output = WebGUI::Content::PassiveAnalytics::handler($session);
=head1 SUBROUTINES
These subroutines are available from this package:
=cut
#-------------------------------------------------------------------
=head2 handler ( session )
The content handler for this package.
=cut
sub handler {
my ($session) = @_;
my $output = undef;
return undef unless $session->form->get('op') eq 'passiveAnalytics';
my $function = "www_".$session->form->get('func');
if ($function ne "www_" && (my $sub = WebGUI::PassiveAnalytics::Flow->can($function))) {
$output = $sub->($session);
}
else {
WebGUI::Error::MethodNotFound->throw(error=>"Couldn't call non-existant method $function inside PassiveAnalytics", method=>$function);
}
return $output;
}
1;