sub storno {
$lxdebug->enter_sub();
-use CGI::Carp qw(fatalsToBrowser);
+
if ($form->{storno}) {
$form->error($locale->text('Cannot storno storno invoice!'));
}
# saving the history
$form->{snumbers} = qq|invnumber_| . $form->{invnumber};
$form->{addition} = "PAYMENT POSTED";
+ $form->{what_done} = $form->{currency} . qq| | . $form->{paid} . qq| | . $locale->text("POSTED");
$form->save_history($form->dbconnect(\%myconfig));
# /saving the history
$form->redirect($locale->text(' Payment posted!'));