X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7b5835061e81d1af578e1572e435d6f3e61d2989..3d145cb7b03f04100c13892750c814d157cd99f4:/SL/Controller/Base.pm?ds=sidebyside diff --git a/SL/Controller/Base.pm b/SL/Controller/Base.pm index d50d519b7..f8eee88a6 100644 --- a/SL/Controller/Base.pm +++ b/SL/Controller/Base.pm @@ -65,14 +65,15 @@ sub render { } my %params = ( %locals, - AUTH => $::auth, - FLASH => $::form->{FLASH}, - FORM => $::form, - LOCALE => $::locale, - LXCONFIG => \%::lx_office_conf, - LXDEBUG => $::lxdebug, - MYCONFIG => \%::myconfig, - SELF => $self, + AUTH => $::auth, + FLASH => $::form->{FLASH}, + FORM => $::form, + INSTANCE_CONF => $::instance_conf, + LOCALE => $::locale, + LXCONFIG => \%::lx_office_conf, + LXDEBUG => $::lxdebug, + MYCONFIG => \%::myconfig, + SELF => $self, ); my $output; @@ -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 {