X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b9f5d35e71de0be24781f36cb56a5806c183ab7f..a8459f498a58bdabcd87bcdf1cd08e9f5726abe4:/SL/Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 00880f1b2..f737a58dd 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -681,20 +681,6 @@ sub show_generic_error {
     'label_error' => $error,
   };
 
-  if ($params{action}) {
-    my @vars;
-
-    map { delete($self->{$_}); } qw(action);
-    map { push @vars, { "name" => $_, "value" => $self->{$_} } if (!ref($self->{$_})); } keys %{ $self };
-
-    $add_params->{SHOW_BUTTON}  = 1;
-    $add_params->{BUTTON_LABEL} = $params{label} || $params{action};
-    $add_params->{VARIABLES}    = \@vars;
-
-  } elsif ($params{back_button}) {
-    $add_params->{SHOW_BACK_BUTTON} = 1;
-  }
-
   $self->{title} = $params{title} if $params{title};
 
   $self->header();