X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fdo.pl;h=ae804c8f6c500ef2f6c5b71b9b5a99f3bdfd3948;hb=a3fbb2f841cb533264f1b3c839f7ded19cdeca6c;hp=cf0e806ceeee3e8b8847766bab5856cd001c4159;hpb=2a61343ffdeee475d57c355d00955ff8f1937aef;p=kivitendo-erp.git

diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl
index cf0e806ce..ae804c8f6 100644
--- a/bin/mozilla/do.pl
+++ b/bin/mozilla/do.pl
@@ -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;