#!/usr/bin/perl -wT
 
#----------------------------------------------------------------------
# heading     : Miscellaneous
# description : Report a bug
# navigation  : 7000 7300
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
#----------------------------------------------------------------------

use strict;
use warnings;
use esmith::TestUtils;
use esmith::FormMagick::Panel::bugreport;

my $f = esmith::FormMagick::Panel::bugreport->new();
$f->display() if $f;

=pod

=head1 NAME

bugreport -- report a bug

=head2 DESCRIPTION

This screen helps the administrator to submit helpful bug reports

=begin testing

=end testing

=cut

__DATA__
<form
     title="FORM_TITLE"
     header="/etc/e-smith/web/common/head.tmpl"
     footer="/etc/e-smith/web/common/foot.tmpl">
 
     <page name="First" pre-event="print_status_message()"
         post-event="create_configuration_report">
         
    	<subroutine src="display_page()"/>    
    
    	<subroutine src="print_button('CREATE_REPORT')" />
         
    	<subroutine src="display_donation()"/>      
     </page>
     
     <page name="ConfigReportPage" >
         <subroutine src="show_config_report()" />
         
     </page>
</form>