[Bio] / WebApplication / WebPage / Error.pm Repository:
ViewVC logotype

View of /WebApplication/WebPage/Error.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.5 - (download) (as text) (annotate)
Tue Aug 7 15:51:04 2007 UTC (12 years, 11 months ago) by paarmann
Branch: MAIN
CVS Tags: mgrast_dev_08112011, rast_rel_2009_05_18, mgrast_dev_08022011, rast_rel_2014_0912, rast_rel_2008_06_18, mgrast_dev_03052011, mobedac_release_05302012, mgrast_dev_05262011, rast_rel_2008_12_18, mgrast_dev_04082011, rast_rel_2008_07_21, rast_rel_2010_0928, rast_2008_0924, mgrast_version_3_2, mgrast_dev_12152011, rast_rel_2008_04_23, rast_rel_2008_06_16, mgrast_dev_06072011, rast_rel_2008_09_30, rast_rel_2009_0925, rast_rel_2010_0526, rast_rel_2014_0729, mgrast_dev_02212011, rast_rel_2010_1206, mgrast_release_3_0, mgrast_dev_03252011, rast_rel_2010_0118, mgrast_rel_2008_0924, mgrast_rel_2008_1110_v2, rast_rel_2009_02_05, rast_rel_2011_0119, mgrast_rel_2008_0625, mgrast_release_3_0_4, mgrast_release_3_0_2, mgrast_release_3_0_3, mgrast_release_3_0_1, mgrast_dev_03312011, mgrast_release_3_1_2, mgrast_release_3_1_1, mgrast_release_3_1_0, mgrast_dev_04132011, rast_rel_2008_10_09, mgrast_dev_04012011, rast_release_2008_09_29, mgrast_rel_2008_0806, mgrast_rel_2008_0923, mgrast_rel_2008_0919, rast_rel_2009_07_09, rast_rel_2010_0827, mgrast_rel_2008_1110, myrast_33, rast_rel_2011_0928, rast_rel_2008_09_29, mgrast_rel_2008_0917, rast_rel_2008_10_29, mgrast_dev_04052011, mgrast_dev_02222011, rast_rel_2009_03_26, mgrast_dev_10262011, rast_rel_2008_11_24, rast_rel_2008_08_07, HEAD
Changes since 1.4: +3 -1 lines
added html title

package WebPage::Error;

# Error - display an error page for the WebApplication Server

# $Id: Error.pm,v 1.5 2007/08/07 15:51:04 paarmann Exp $

use strict;
use warnings;

use base qw( WebPage );

1;

=pod

=head1 NAME

Error - display an error page for the WebApplication Server

=head1 DESCRIPTION

WebPage module to display an error message within the context of the 
WebApplication web framework. This module file only defines the output 
method, all other functionality is inherited from WebPage.pm

=head1 METHODS

=over 4

=item * B<output> ()

Returns the html output of the Error page.

=cut

sub output {
  my ($self) = @_;
  
 $self->title('Error');

  my $html = "<h2>An error has occured:</h2>";
  $html .= "<p>".$self->application->error."</p>";
  $html .= "<p>To continue please go back to the <a href='".
    $self->application->url."?page=".$self->application->default."'>start page</a>.</p>";
  
  return $html;

}

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3