]> wagnertech.de Git - mfinanz.git/blobdiff - bin/mozilla/do.pl
Löschen von Lieferscheinen mit JavaScript-Sicherheitsabfrage
[mfinanz.git] / bin / mozilla / do.pl
index cf0e806ceeee3e8b8847766bab5856cd001c4159..ae804c8f6c500ef2f6c5b71b9b5a99f3bdfd3948 100644 (file)
@@ -691,25 +691,6 @@ sub delete {
 
   check_do_access();
 
-  my $form     = $main::form;
-  my $locale   = $main::locale;
-
-  map { delete $form->{$_} } qw(action header login password);
-  my @variables = map { { 'key' => $_, 'value' => $form->{$_} } } grep { '' eq ref $form->{$_} } keys %{ $form };
-
-  $form->{title} = $locale->text('Delete delivery order');
-  $form->header();
-
-  print $form->parse_html_template('do/delete', { 'VARIABLES' => \@variables });
-
-  $main::lxdebug->leave_sub();
-}
-
-sub delete_delivery_order {
-  $main::lxdebug->enter_sub();
-
-  check_do_access();
-
   my $form     = $main::form;
   my %myconfig = %main::myconfig;
   my $locale   = $main::locale;