mason/solgs/site/error/exception.mas

   1 <%args>
   2  $exception
   3  $show_dev_message => 0
   4  $project_name
   5  $contact_email
   6 </%args>
   7
   8 % $exception = [ $exception ] unless ref $exception eq 'ARRAY';
   9 % for my $e (@$exception) {
  10
  11 <h1 style="text-align: center">
  12    <% $e->title || ( $e->is_server_error ? 'Server Error' : $e->is_client_error ? 'Error' : 'Message' ) %>
  13 </h1>
  14
  15 <div style="margin: auto; width: 60%">
  16     <p>
  17 % if( $e->public_message ) {
  18     <% $e->public_message . ( $e->public_message =~ /\.\s*$/ ? '' : '.' ) %>
  19 % } else {
  20     Our apologies, there was an error processing your request.
  21 % }
  22     </p>
  23
  24     <p>
  25 % if( $e->notify ) {
  26     An error report has been sent to the <% $project_name %> development team.
  27 % }
  28
  29 % if( $e->is_client_error || $e->is_server_error and $contact_email ) {
  30     If the problem persists, please contact us at <a href="mailto:<% $contact_email %>"><% $contact_email %>.</a>
  31 %   if( $e->is_server_error ) {
  32       We will keep you informed of our progress in resolving it.
  33 %   }
  34    </p>
  35
  36 % }
  37
  38 </div>
  39
  40 %   if( $show_dev_message && $e->can('developer_message') && defined $e->developer_message ) {
  41     <style>
  42        pre {
  43             white-space: pre-wrap;       /* css-3 */
  44             white-space: -moz-pre-wrap;  /* Mozilla, since 1999 */
  45             white-space: -pre-wrap;      /* Opera 4-6 */
  46             white-space: -o-pre-wrap;    /* Opera 7 */
  47             word-wrap: break-word;       /* Internet Explorer 5.5+ */
  48         }
  49      </style>
  50
  51     <div style="margin: 1em 0; border: 2px solid orange; padding: 0 1em 1em 1em">
  52       <h3>Developer message:</h3>
  53         <pre><% defined $e->developer_message ? $e->developer_message : 'none provided' | h %></pre>
  54     </div>
  55 %   }
  56 % }