e-smith-manager/root/etc/e-smith/web/functions/bugreport

60 lines
1.4 KiB
Plaintext
Raw Normal View History

#!/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>