System Error

% if (Bric::Config::QA_MODE) { <& /widgets/qa/qa.mc &> % }

An exception was thrown:

Fault Type: <% $fault->description %>
Timestamp: <% strfdate($fault->time) %>
Package: <% $fault->package %>
Filename: <% $fault->file %>
Line: <% $fault->line %>
Message: <% $fault->error . ($more_err ? "\n\n$more_err" : '') %> % if ($is_burner_error) {

% } else {
Payload: <% $pay %>

% }

Request args: % foreach my $arg (keys %req_args) { % }
<% $arg %>: <% $req_args{$arg} %>
% if ($is_burner_error) {

Payload:
Class: <% $pay->{class} %>
Action: <% $pay->{action} %>
Output Channel: <% $pay->{context}{oc}->get_name %>
Category: <% $pay->{context}{cat}->get_name %>
Element: <% $pay->{context}{elem}->get_name %>
% } Stack:
<% join("
\n", @{$fault->get_stack} ) %>

<& '/widgets/debug/debug.mc' &>

Email the Bricolage Developers
<%args> $fault => undef $more_err => undef <%init>; # Clear out messages - they're likely irrelevant now. clear_msg(); # If $fault is undef, the exception object MUST BE in pnotes # (from AccessHandler or PreviewHandler) unless (defined $fault) { $fault = $r->pnotes('BRIC_EXCEPTION'); } warn '$fault not an exception object' unless isa_exception($fault); # From here on, $fault MUST BE an exception object # Get payload, stringify if payload is an exception object my $pay = isa_bric_exception($fault) ? ($fault->payload || '') : ''; $pay = "$pay"; my $is_burner_error = ($fault->error =~ /^Unable to find template/); my %req_args = HTML::Mason::Request->instance->request_args;