X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/193c7381081bb403800d111676e1abb69724ffa6..f6c60e9467658c089790836395281ed5729e5305:/SL/Form.pm?ds=inline 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();