From ebef09a8bde1d401fc7b0d60cfe09393e9a84c0f Mon Sep 17 00:00:00 2001 From: Thomas Kasulke Date: Tue, 20 Feb 2007 10:43:11 +0000 Subject: [PATCH] =?utf8?q?Historie=20eingef=C3=BCgt?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- bin/mozilla/common.pl | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) diff --git a/bin/mozilla/common.pl b/bin/mozilla/common.pl index 2c44c094a..86f797bb5 100644 --- a/bin/mozilla/common.pl +++ b/bin/mozilla/common.pl @@ -9,6 +9,7 @@ # ###################################################################### +use SL::Form; use YAML; use SL::Common; @@ -528,4 +529,19 @@ sub reformat_numbers { $lxdebug->leave_sub(); } +sub show_history { + $lxdebug->enter_sub(); + my $dbh = $form->dbconnect(\%myconfig); + + $form->{title} = $locale->text("History"); + $form->header(); + print $form->parse_html_template( "common/show_history", { + "DATEN" => $form->get_history($dbh,$form->{input_name}), + "SUCCESS" => ($form->get_history($dbh,$form->{input_name}) ne "0") + } ); + + $dbh->disconnect(); + $lxdebug->leave_sub(); +} + 1; -- 2.20.1