Complete asset manager rewrite.

This commit is contained in:
Doug Bell 2008-05-26 22:07:16 +00:00
parent dc30ecccbe
commit f3996eb316
14 changed files with 1189 additions and 331 deletions

View file

@ -53,11 +53,14 @@ sub handler {
$request->push_handlers(PerlResponseHandler => sub {
my $session = WebGUI::Session->open($server->dir_config('WebguiRoot'), $config->getFilename, $request, $server);
foreach my $handler (@{$config->get("contentHandlers")}) {
my $output = eval { WebGUI::Pluggable::run($handler, "handler", [ $session ] ) };
my $output = WebGUI::Pluggable::run($handler, "handler", [ $session ] );
if ( my $e = WebGUI::Error->caught ) {
$session->errorHandler->error($e->package.":".$e->line." - ".$e->error);
$session->errorHandler->debug($e->package.":".$e->line." - ".$e->trace);
}
elsif ( $@ ) {
$session->errorHandler->error( $@ );
}
else {
if ($output eq "chunked") {
if ($session->errorHandler->canShowDebug()) {