X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7e6d7935ef67bfb97d4aa8b6fb44b26e9a3d3e04..db7d94cc0b44a94497e0a6ff81b9eb5e48a69d5f:/SL/Form.pm diff --git a/SL/Form.pm b/SL/Form.pm index 5a9272465..8c816f729 100644 --- a/SL/Form.pm +++ b/SL/Form.pm @@ -294,11 +294,7 @@ sub error { } else { - if ($self->{error_function}) { - &{ $self->{error_function} }($msg); - } else { - die "Error: $msg\n"; - } + die "Error: $msg\n"; } $main::lxdebug->leave_sub();