X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7b5835061e81d1af578e1572e435d6f3e61d2989..891411c15c60f4099e7d2f687de8efe84b2e0fbb:/SL/Controller/Base.pm diff --git a/SL/Controller/Base.pm b/SL/Controller/Base.pm index d50d519b7..392f441c2 100644 --- a/SL/Controller/Base.pm +++ b/SL/Controller/Base.pm @@ -68,6 +68,7 @@ sub render { AUTH => $::auth, FLASH => $::form->{FLASH}, FORM => $::form, + INSTANCE_CONF => $::instance_conf, LOCALE => $::locale, LXCONFIG => \%::lx_office_conf, LXDEBUG => $::lxdebug, @@ -174,9 +175,13 @@ sub _dispatch { my $action = first { $::form->{"action_${_}"} } @actions; my $sub = "action_${action}"; - $self->_run_hooks('before', $action); - $self->$sub(@_); - $self->_run_hooks('after', $action); + if ($self->can($sub)) { + $self->_run_hooks('before', $action); + $self->$sub(@_); + $self->_run_hooks('after', $action); + } else { + $::form->error($::locale->text('Oops. No valid action found to dispatch. Please report this case to the Lx-Office team.')); + } } sub _template_obj {